在 Visual Basic (VB) 中，你可以通过多种方式将数据写入数组。下面是一个简单的示例，展示了如何声明、初始化和向数组中写入数据。
示例代码
vb
Module Module1
Sub Main)
' 声明一个整数数组，大小为5
Dim numbers(4) As Integer ' 数组索引从0开始，所以4表示5个元素
' 向数组中写入数据
numbers(0) = 10
numbers(1) = 20
numbers(2) = 30
numbers(3) = 40
numbers(4) = 50
' 输出数组中的数据
For i As Integer = 0 To numbers.Length - 1
Console.WriteLine("numbers(" & i & ") = " & numbers(i))
Next
' 暂停控制台窗口，以便查看输出
Console.ReadLine()
End Sub
End Module
说明
声明数组：
Dim numbers(4) As Integer 声明了一个整数数组 numbers，它有5个元素（索引从0到4）。
jrhz.info写入数据：
使用 numbers(index) = value 语法向数组的特定索引位置写入数据。
读取和输出数据：
使用 For 循环遍历数组，并输出每个元素的值。
其他方式初始化数组
你也可以在声明数组时直接初始化它：
vb
Dim numbers() As Integer = {10, 20, 30, 40, 50}
这种方式会自动推断数组的大小，并根据提供的值进行初始化。
动态数组
如果你需要动态调整数组的大小，可以使用 ReDim 关键字：
vb
Dim dynamicNumbers() As Integer
ReDim dynamicNumbers(4) ' 调整大小为5个元素
' 写入数据
dynamicNumbers(0) = 100
dynamicNumbers(1) = 200
' ... 继续写入其他数据
使用 ReDim 时，数组中现有的数据会被清除。如果你希望保留现有数据，可以使用 ReDim Preserve：
vb
ReDim Preserve dynamicNumbers(6) ' 调整大小为7个元素，同时保留现有数据
希望这些示例能帮助你理解如何在 VB 中写入数组。
