Example:

  1. Sub Main

    1. Dim TestArray() As Integer

      Dim I

      ReDim TestArray(10)

      For I = 1 To 10

      1. TestArray(I) = I + 10

        Print TestArray(I)

      Next I

    End Sub