In diesem Beispiel wird die ReDim-Anweisung verwendet, um Variablen für dynamische Datenfelder zu deklarieren und dann Speicher zu reservieren bzw. freizugeben. Es wird angenommen, daß Option Base auf 1 festgelegt ist.
Dim Feld1() As Integer ' Dynamisches Datenfeld deklarieren.
Redim Feld1(5) ' 5 Elemente reservieren.
For I = 1 To 5 ' 5 Schleifendurchläufe.
Feld1(I) = I ' Datenfeld initialisieren.
Next I
Die nächste Anweisung ändert die Größe des Datenfeldes und löscht die Elemente.
Redim Feld1(10) ' Größe auf 10 Elemente ändern.
For I = 1 To 10 ' 10 Schleifendurchläufe.
Feld1(I) = I ' Datenfeld initialisieren.
Next I
Die nächste Anweisung ändert die Größe des Datenfeldes, löscht die Elemente jedoch nicht.
Redim Preserve Feld1(15) ' Größe auf 15 Elemente ändern.