Contoh Penggunaan Array Pada Gambas

' Gambas class file

Static Public Sub main()

   Dim i As Integer

   Dim ii As Integer

   Dim iii As Integer

   Dim narMatrix As New Integer[3, 3, 3]

   For i = 0 To 2

     For ii = 0 To 2

       For iii = 0 To 2

          Print i, ii, iii & " ==> ";

          narMatrix[i, ii, iii] = i * 9 + ii * 3 + iii

          Print narMatrix[i, ii, iii]

       Next

      Next

    Next

End

Result:

0 0 0 ==> 0

0 0 1 ==> 1

0 0 2 ==> 2

0 1 0 ==> 3

0 1 1 ==> 4

0 1 2 ==> 5

0 2 0 ==> 6

0 2 1 ==> 7

0 2 2 ==> 8

1 0 0 ==> 9

1 0 1 ==> 10

1 0 2 ==> 11

1 1 0 ==> 12

1 1 1 ==> 13

1 1 2 ==> 14

1 2 0 ==> 15

1 2 1 ==> 16

1 2 2 ==> 17

2 0 0 ==> 18

2 0 1 ==> 19

2 0 2 ==> 20

2 1 0 ==> 21

2 1 1 ==> 22

2 1 2 ==> 23

2 2 0 ==> 24

2 2 1 ==> 25

2 2 2 ==> 26