创建一个数组对象数组？

Question

我有一个数据对象

我也有这些数据数组对象

我想把这些阵列的数据对象到另一个阵列

Dim ArrayOfDataObjects1(10) as new DataObject 
Dim ArrayOfDataObjects2(10) as new DataObject 
Dim ArrayOfDataObjects3(10) as new DataObject 

'Now, I want to put all of these into another array, how can I? 

谢谢！

编辑：我知道我需要创建另一个大小为3的数组，但是我将该数组定义为什么类型？

Answer 1

如果您不关心类型安全性，可以使用Variant。 Excel VBA中的示例：

Sub a() 
Dim ArrayOfDataObjects1(10) As Worksheet 
Dim ArrayOfDataObjects2(10) As Worksheet 
Dim ArrayOfDataObjects3(10) As Worksheet 

Dim arr(3) As Variant 

Set ArrayOfDataObjects1(1) = ActiveSheet 

arr(1) = ArrayOfDataObjects1 

arr(2) = ArrayOfDataObjects2 

arr(3) = ArrayOfDataObjects3 

MsgBox arr(1)(1).Name 

End Sub