如何清空数组

Question

如题
谢谢

Answer 1

重新初始化大小固定的数组的元素，以及释放动态数组的存储空间。
erase 组数名用于为动态数组变量重新分配存储空间。
redim 组数名

Answer 2

Erase 语句示例
该示例使用 Erase 语句重新初始化固定大小的数组中的元素，以及释放动态数组存储空间。'声明数组变量。
Dim NumArray(10) As Integer   ' Integer 数组。
Dim StrVarArray(10) As String   '变长的 String 数组。
Dim StrFixArray(10) As String * 10   '定长的 String 数组。
Dim VarArray(10) As Variant   'Variant 数组。
Dim DynamicArray() As Integer   '动态数组。
ReDim DynamicArray(10)   '分配存储空间。
Erase NumArray   '将每个元素设为 0。
Erase StrVarArray   '将每个元素设为
   '零长度字符串 ("")。
Erase StrFixArray   '将每个元素设为 0。
Erase VarArray   '将每个元素设为 Empty。
Erase DynamicArray   '释放数组所用内存。