Example - ReDim Statement

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