Vba-erase-function

VBA-消去機能

消去機能は、固定サイズの配列の値をリセットし、動的配列のメモリを解放するために使用されます。 配列のタイプに応じて動作します。

構文

Erase ArrayName

• 固定数値配列。配列内の各要素はゼロにリセットされます。
• 固定文字列配列。配列の各要素は長さゼロの「」にリセットされます。
• オブジェクトの配列。配列内の各要素は特別な値Nothingにリセットされます。

例

ボタンを追加し、次の関数を追加します。

Private Sub Constant_demo_Click()
   Dim NumArray(3)
   NumArray(0) = "VBScript"
   NumArray(1) = 1.05
   NumArray(2) = 25
   NumArray(3) = #23/04/2013#

   Dim DynamicArray()
   ReDim DynamicArray(9)   ' Allocate storage space.

   Erase NumArray          ' Each element is reinitialized.
   Erase DynamicArray      ' Free memory used by array.

   ' All values would be erased.
   msgbox("The value at Zeroth index of NumArray is " & NumArray(0))
   msgbox("The value at First index of NumArray is " & NumArray(1))
   msgbox("The value at Second index of NumArray is " & NumArray(2))
   msgbox("The value at Third index of NumArray is " & NumArray(3))
End Sub

上記の関数を実行すると、次の出力が生成されます。

The value at Zeroth index of NumArray is
The value at First index of NumArray is
The value at Second index of NumArray is
The value at Third index of NumArray is