for example >>
Code:
  Dim myArray(2, 2)
        Dim counter1, counter2 As Integer
        For counter1 = 0 To myArray.GetUpperBound(0)
            For counter2 = 0 To myArray.GetUpperBound(1)
                MsgBox(myArray(counter1, counter2))
            Next
        Next