vba - 数组的数组 : Can you directly ReDim an inner array?

Question

假设我想要一个 10 元素数组，第一个元素是一个 2 元素数组。这是我想做的，但它会导致编译错误:

Dim a As Variant: ReDim a(9)
ReDim a(0)(2)

这行得通，但它会复制一份，如果可能的话，我想直接这样做:

Dim a As Variant: ReDim a(9)
Dim b As Variant: ReDim b(2)
a(0) = b

Answer 1

无需Dim 和ReDim 您的阵列。如果您希望数组具有静态大小，只需使用 Dim:

Dim a(9)

要使第一个元素成为空的双元素子数组，您可以使用 Array() 函数并为元素分配初始值 Empty:

a(0) = Array(Empty, Empty)

测试:

Debug.Print IsEmpty(a(0))        ' False (holds sub-array)
Debug.Print IsEmpty(a(4))        ' True (uninitialized main element)
Debug.Print IsEmpty(a(0)(0))     ' True (uninitialized subarray element)