我在尝试使用visual basic将整数输入到数组时遇到了一些麻烦。我是一个非常新的使用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
我想要实现的是询问用户他们想要在阵列中输入多少个整数,然后允许用户输入他们选择的整数量并存储这些整数在阵列中。
如果有人可以给我一个代码示例,我将如何做到这一点或任何帮助,我会非常感激。
答案 0 :(得分:4)
您可以使用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
答案 1 :(得分:1)
我也会使用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