Redim Preserve array : ReDim « Collections « VB.Net Tutorial

1. VB.Net Tutorial
2. Collections
3. ReDim

Option Strict On

Public Module modMain
   Public Sub Main()
      Dim PowerOf2() As Integer = {0, 1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024}
      Redim Preserve PowerOf2(PowerOf2.GetUpperBound(0)\2)
      For Each int As Integer In PowerOf2
         Console.Write("--{0}--", int)
      Next
   End Sub
End Module

--0----1----2----4----8----16--"