怎么弄啊?急急急?>~~~~
多维数组便可以理解为数组的嵌套形式。
若不使用多维数组,可以通过以下方法:
先定义指定被嵌套的数组(如例程中的 TempInt 及 TempInt_2 数组),
然后声明一个数组元素类型声明为 Object 引用类型的数组(如例程中的 GroupTempInt 数组),
作为所有类的基类,数组元素为 Object 类型的元素可以接收任意类型的值,包括数组引用,
将 TempInt 及 TempInt_2 数组的引用作为 GroupTempInt 的元素即可,
然而数组与数组之间却是相互独立,毫无干系的:
例程:
Dim TempInt() As Integer = {1, 2, 3, 4, 5} '数组1
Dim TempInt_2() As Integer = {6, 7, 8, 9, 10} '数组2
'数组簇
Dim GroupTempInt() As Object = {TempInt, TempInt_2}
用例:
(1)使用 GroupTempInt 获得 TempInt 的第二个元素值(该值为 2 )的方法:
GroupTempInt(0)(1)
使用实例代码: Msgbox("TempInt 的第2个元素值为: " & GroupTempInt(0)(1) )
(2)使用 GroupTempInt 获得 TempInt_2 的第五个元素值(该值为 10 )的方法:
GroupTempInt(1)(4)
使用实例代码: Msgbox("TempInt_2 的第5个元素值为: " & GroupTempInt(1)(4) )
说明:
GroupTempInt(0)(1) 或 GroupTempInt(1)(4) 的执行过程如下:
GroupTempInt 是一个普通的 Object 类型数组,对其元素的访问,可以使用如下形式:
GroupTempInt(下标)
在 GroupTempInt(0)(1) 表达式中,GroupTempInt(0) 求得指定数组 TempInt 的数组引用,
GroupTempInt(0) 所求出的数组引用实际上与 TempInt 数组引用是一样的,
所以,GroupTempInt(0)(1) 实际上便是 TempInt(1)。
[此贴子已经被作者于2007-6-10 15:03:28编辑过]