二維陣列

除了一維陣列,我們還可以宣告二維陣列:

Dim A(2, 2) as Integer

如果以下表:

A 0 1 2
0      
1      
2      

我們可以利用For敘述句配置一些資料:

For i =  0 to 2
    For j = 0 to 2
        A(i, j) = i + j
    Next j
Next i

結果:

A 0 1 2
0 0 1 2
1 1 2 3
2 2 3 4

上一頁