Erase ステートメント（配列の初期化・動的配列のメモリ解放）

'ユーザー定義型の定義 Private Type mynewType Name As String Num As Long End Type Sub sample_erase01() Dim intArray(5) As Integer '整数型配列 Dim vstrArray(5) As String '文字列配列（可変長） Dim fstrArray(10) As String * 8 '文字列配列（固定長） Dim valArray(10) As Variant 'バリアント Dim myArray(3) As mynewType 'ユーザー定義 Dim objArray(3) As Object 'オブジェクト '上記静的配列を初期化 Erase intArray, vstrArray, fstrArray, valArray, myArray, objArray Debug.Pr

[bootstraploader]

動的配列：要素の保持自体を破棄し、要素をひとつも持たない宣言時の状態に戻ります