您可以使用List(Of T) 存储可变数量的项目或使用数组存储固定数量的项目。 (在同一示例中显示两者,假设卡值是整数)
Dim valuesArray(3) As Integer
Dim valuesList As New List(Of Integer)
Console.WriteLine("You drew: ")
For count As Integer = 1 To 3
Dim cardValue = GetCardValue()
valuesArray(count) = cardValue
valuesList.Add(cardValue)
Console.WriteLine("A " & cardValue & GetSuit())
Next
现在,您可以使用
Console.WriteLine(valuesArray(1))
Console.WriteLine(valuesArray(2))
Console.WriteLine(valuesArray(3))
或
Console.WriteLine(valuesList(0))
Console.WriteLine(valuesList(1))
Console.WriteLine(valuesList(2))
数组和列表都从 0 开始编号。请注意,数组的长度为 4。我们没有使用 valuesArray(0)。
你也可以使用for-each
For Each item In valuesArray
Console.WriteLine(item)
Next
或
For Each item In valuesList
Console.WriteLine(item)
Next
迭代变量item 是自动声明的,并且仅限于for each 循环。也可以显式指定类型For Each item As Integer In valuesArray