如上一课中所述，变量用于存储不同类型的数据以供程序使用。还有另一种称为“数组”的变量，它提供了一种便利的方法来存储同一类型的多个值。
例如，假设您要为一支棒球队编写程序，并想存储场上所有队员的姓名。您可以创建九个单独的字符串变量（每个队员一个），或者声明一个类似于此处显示的代码的数组变量。
Dim players() As String
您可以通过在变量名称之后加括号来声明一个数组变量。如果您知道需要存储多少个值，也可以按如下所示在声明中指定数组的大小。
Dim players(8) As String
数组大小是 9，因为棒球队有 9 个队员。数组由许多值或“元素”组成，并且从元素 0 开始，而以比声明中指定的数字少 1 的数字结束。在本例中，数组包含元素 0 到 8，总共 9 个元素。当您希望引用球队中的某一个队员时，只需减去 1。例如，若要引用第一名队员，引用元素 0；若要引用第九名队员，引用元素 8。
为数组赋值
与其他类型的值一样，您必须为数组赋值。为此，需引用元素编号作为赋值的一部分，如此处所示。
players(0) = "John" players(3) = "Bart"
在前面的代码中，值 John 赋给数组的第一个元素（元素 0），值 John 赋给第四个元素（元素 3）。数组元素无需按序赋值，任何未赋值的元素都将有一个默认值，在本例中为空字符串。
与其他类型的值一样，您可以在单独的一行上声明一个数组并为它赋值，如下所示。
Dim players() As Integer = {1, 2, 3, 4, 5, 6, 7, 8, 9}
在本例中，大括号表示值列表。按照所列顺序给元素赋值。注意，未指定数组的大小—它取决于所列项的数目。
从数组中检索值
正如在数组中用数字指定某一项的位置一样，可用元素编号来指定所要检索的值。
Dim AtBat As String AtBat = players(3)
以上代码检索数组中的第四个元素并将它赋给字符串变量 AtBat。
试一试！
在数组中存储值
1. 在“文件”菜单上单击“新建项目”。
2. 在“新建项目”对话框的“模板”窗格中，单击“Windows 应用程序”。
3. 在“名称”框中，键入 MyFirstArray，然后单击“确定”。
一个新的 Windows 窗体项目随即打开。
4. 将一个“Textbox”控件从“工具箱”中拖动到窗体上。
5. 将一个“Button”控件从“工具箱”中拖动到窗体上。
6. 双击“Button”以打开代码编辑器。
7. 在 Button1_Click 事件过程中，添加以下代码：
Dim players() As String = {"Dan", "Fred", "Bart", "Carlos", _
"Ty", "Juan", "Jay", "Sam", "Pedro"} Dim i As Integer = CInt(Textbox1.Text) MsgBox(players(i) & " is on first base.")
注意，上面的代码使用 CInt 函数将 String 值 (TextBox1.Text) 转换为 Integer (i)。可以在详细了解：转换变量类型中了解有关转换的更多信息。
8. 按 F5 运行程序。
9. 在文本框中键入 0 到 8 之间的一个数字，然后单击此按钮。消息框中将显示与该元素对应
的名称。
