Erase 语句
重新初始化固定大小数组的元素并释放动态数组存储空间。
语法
Erasearraylist
所需的 arraylist参数 是一个或多个要擦除的逗号分隔数组 变量 。
备注
Erase 的行会略为不同，具体取决于数组是固定大小的（普通）还是动态的。 Erase 不会恢复固定大小的数组的内存。 Erase 会设置固定数组的元素，如下所示：
| 数组的类型 | Erase 对固定数组元素的影响 |
|---|---|
| 固定数值数组 | 将每个元素设置为 0。 |
| 固定字符串数组（可变长度） | 将每个元素设置为零长度字符串 ("")。 |
| 固定字符串数组（固定长度） | 将每个元素设置为 0。 |
| 固定 Variant 数组 | 将每个元素设置为 Empty。 |
| 用户定义类型的数组 | 设置每个元素，就好像它是单独的变量一样。 |
| 对象的数组。 | 将每个元素设置为特定值 Nothing。 |
Erase 释放动态数组使用的内存。 在程序再次引用动态数组之前，它必须使用 ReDim 语句重新声明数组变量的维度。
示例
此示例使用 Erase 语句重新初始化固定大小数组的元素，并解除分配动态数组存储空间。
' Declare array variables.
Dim NumArray(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 NumArray ' 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.
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。