1 數組嵌套的知識
1維數組的嵌套並非2維數組
二維數組的嵌套並非三維數組
2 數組的嵌套寫法
1維數組的嵌套：arr(m)(i)
2維數組的嵌套：arr(m)(i,j)
Sub test1001()
Debug.Print "測試一維數組和其嵌套"
'一維數組
arr1 = Array(1, 3, 5, 7, 9)
arr2 = Array(2, 4, 6, 8, 10)
'一維數組的嵌套
arr3 = Array(arr1, arr2)
'Debug.Print arr3(1, 1) '證明了一維數組的嵌套，只是嵌套類型，不是2維數組
Debug.Print arr3(1)(1)
Debug.Print
Debug.Print "測試二維數組和其嵌套"
Dim arr51()
ReDim arr51(3, 3)
'2維數組
For I = 1 To 3
For J = 1 To 3
arr51(I, J) = 2 * I * J
Debug.Print arr51(I, J);
Next
Debug.Print
Next
Debug.Print
Debug.Print arr51(1, 1)
Debug.Print
Dim arr52()
ReDim arr52(4, 4)
'2維數組
For I = 1 To 4
For J = 1 To 4
arr52(I, J) = 3 * I * J
Debug.Print arr52(I, J);
Next
Debug.Print
Next
Debug.Print
Debug.Print arr52(1, 1)
Debug.Print
'2維數組的嵌套
arr53 = Array(arr51, arr52)
Debug.Print arr53(1)(1, 1) '二維數組的嵌套，也不需要2個數組行列相同
Debug.Print
Debug.Print "測試二維數組和其嵌套,第2種辦法，[{}] 這種寫法必須index從1開始"
'2維數組
'arr11 = [{1,3,5};{5,7,9}]
'arr12 = [{2,4,6};{6,8,10}]
arr11 = [{1,3,5;5,7,9}]
arr12 = [{2,4,6;6,8,10}]
Debug.Print arr11(1, 1)
'2維數組的嵌套
arr13 = Array(arr11, arr12)
Debug.Print arr13(1)(1, 1)
Debug.Print "測試二維數組和其嵌套,第3種辦法---[{,,, ; ,,,}]只有一種寫法 []其他寫法不是數組"
'2維數組
'arr21 = [{1,3,5};{5,7,9}]
'arr22 = [{2,4,6};{6,8,10}]
arr21 = [{1,3,5},{5,7,9}]
arr22 = [{2,4,6},{6,8,10}]
End Sub
其實我這上面的例子不算嵌套數組，而是組合數組
下面這張才是嵌套數組
嵌套數組還可以 transpose 為二維數組
http://club.excelhome.net/thread-640048-1-1.html
————————————————
版權聲明：本文為CSDN博主「奔跑的犀牛先生」的原創文章，遵循CC 4.0 BY-SA版權協議，轉載請附上原文出處鏈接及本聲明。
原文鏈接：https://blog.csdn.net/xuemanqianshan/article/details/104011670