Code:
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.