如何为数组创建动态变量名？

Question

我有“ComboBox1”，其中包含条目。每次用户选择一个条目时，都会触发以下内容：

Private Sub ComboBox1_Change()
    call populate(ComboBox1.ListIndex)
End Sub

“填充”函数有以下内容：

Sub populate(index as integer)

    dim arr0, arr1, arr2 ...
        arr0 = Array(...)
        arr1 = Array(...)
        arr2 = Array(...)

    Do While x < Application.CountA("arr" + index)
        ...
    Loop

End Sub

我想让 "arr" + index 动态化，以便它根据从调用者函数收到的索引调用正确的数组。这个可以吗？

Answer 1

Sub populate(index as integer)

    dim arr(0 to 2)
        arr(0) = Array(...)
        arr(1) = Array(...)
        arr(2) = Array(...)

    Do While x < Application.CountA(arr(index))
        ...
    Loop

End Sub