作者：杜勇

描述：重新初始化大小固定的数组的元素，以及释放动态数组的存储空间。
一、语法：
Erase　arraylist
所需的arraylist参数是一个或多个用逗号隔开的需要清除的数组变量。

二、说明：
　　Erase根据是固定数组还是动态数组，来采取完全不同的行为。对于固定数组恢复内存。Erase按下表来设置固定数组的元素

数组类型	Erase对固定数组元素的影响
固定数值数组	将每个元素设为0
固定字符串数组（长度可变）	将每个元素设为零长度字符串("")
固定字符串数组（长度固定）	将每个元素设为0
固定Variant数组	将每个元素设为Empty
用户定义类型的数组	将每个元素作为单独的变量来设置
对象数组	将每个元素设为特定值Nothing

　　对于动态数组，Erase释放动态数组所使用的内存。
　　其实对于我们来讲，不必知道Erase采取的行为。只需知道某一动态数组使用了Erase语句后，如果再次引用该动态数组之前，程序必须使用ReDim语句来重新定义该数组变量的维数。

三、应用举例：
　　该示例使用Erase语句释放动态数组存储空间，然后重新分配存储空间。
Dim DynamicArray() As Integer '声明动态数组。
ReDim DynamicArray(10) '定义动态数组的维数，并为其分配存储空间。
Erase DynamicArray '释放数组所用内存。
ReDim DynamicArray(5) '重新分配存储空间。