VBA里实现从一个固定的数组中，依次对一个变量赋值

你可以使用 For 循环来实现从一个固定的数组中，依次对一个变量赋值，以下是示例代码：

Dim myArray(3) As Integer ' 定义一个包含 3 个整数的数组
Dim i As Integer ' 定义一个整数变量

myArray(0) = 10 ' 给数组赋值
myArray(1) = 20
myArray(2) = 30

For i = 0 To UBound(myArray) ' 遍历数组
    MsgBox "第 " & i + 1 & " 个值为：" & myArray(i) ' 输出每个数组元素的值
Next i

在上面的代码中，我们定义了一个包含 3 个整数的数组 `myArray`，并给其赋值。然后通过 `For` 循环遍历数组，将每个数组元素的值赋给变量 `i`，并输出每个数组元素的值。