数组中的visual basic输入



我在尝试使用visualbasic将整数输入数组时遇到了一些问题。我对使用visual basic(以及一般编程)很陌生,我也浏览过谷歌和这个网站,试图找到答案,但我没有找到任何运气,我想看看是否有人能帮我一把。

基本上我到目前为止拥有的

Function inputArray()
    Dim array() As Integer
    Console.WriteLine("Please input how many integers you would like to add")
    For i = 0 To array.Length - 1
        Console.WriteLine("Please enter an integer")
        Console.ReadLine()
    Next
    Console.WriteLine(array)
    Return array
End Function

我试图实现的是询问用户他们想向数组中输入多少整数,然后允许用户输入他们选择的整数数量,并将这些整数存储在数组中。

如果有人能给我一段关于我将如何做到这一点的代码示例或任何帮助,我将不胜感激

您可以使用List而不是Array

这是一个简短的例子(没有错误处理)

Imports system.Threading
Module Module1
    Sub Main()
        Module1.BuildIntegerList()
        Console.ReadKey()
        Environment.Exit(exitCode:=0)
    End Sub
    Private Sub BuildIntegerList()
        Dim values As New List(Of Integer)
        Dim amount As Integer
        Dim nextValue As Integer
        Console.WriteLine("Please input how many integers you would like to add")
        amount = CInt(Console.ReadKey().KeyChar.ToString())
        Do Until values.Count = amount
            Console.Clear()
            Console.WriteLine("Please enter an integer")
            nextValue = CInt(Console.ReadKey().KeyChar.ToString())
            values.Add(nextValue)
            Thread.Sleep(250)
        Loop
        Console.Clear()
        Console.WriteLine(String.Format("Values: {0}", String.Join(", ", values)))
    End Sub
End Module

我也会使用ElektroStudios提到的List。然而,由于您使用了数组,以下是我的编写方法

 Function inputArray()
     Console.WriteLine("Please input how many integers you would like to add")
     Dim count = CInt(console.ReadLine())
     Dim array(count-1) As Integer 
     For i = 0 To count - 1
            Console.WriteLine("Please enter an integer")
            array(i) = CInt(Console.readline())
     Next
      For i = 0 To array.Length-1
        Console.Write(array(i))
      Next
   return array
 End Function

下面是一个工作示例:dotnetfiddle

相关内容

  • 没有找到相关文章

最新更新