Erase Statement

 

Erase arrayname[,arrayname ]

 

Reinitializes the elements of a fixed array.

 

              Related Topics: Dim

 

                  Example:

 

' This example demonstrates some of the  features of arrays.  The lower bound

' for an array is 0 unless it is specified or option base has set it as is

' done in this example.

 

Option Base 1

 

Sub Main

' Declare array variables.

Dim Num(10) As Integer   ' Integer array.

Dim StrVarArray(10) As String   ' Variable-string array.

Dim StrFixArray(10) As String * 10   ' Fixed-string array.

Dim VarArray(10) As Variant   ' Variant array.

Dim DynamicArray() As Integer   ' Dynamic array.

ReDim DynamicArray(10)   ' Allocate storage space.

Erase Num   ' Each element set to 0.

Erase StrVarArray   ' Each element set to zero-length

   ' string ("").  

Erase StrFixArray   ' Each element set to 0.

Erase VarArray   ' Each element set to Empty.

Erase DynamicArray   ' Free memory used by array.

 

End Sub