关于Erase 语句示例(VBA)

gemini527

该示例使用 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。E
rase StrVarArray   '将每个元素设为   
'零长度字符串 ("")。
Erase StrFixArray   '将每个元素设为 0。
Erase VarArray   '将每个元素设为 Empty。
Erase DynamicArray   '释放数组所用内存。

雄鹰

路过，我看了又看，我上看、下看，觉得这个函数就是不一样………………