在一个程序中，同一数组只能用Dim语句定义一次。但有时可能需要清除数组的内容或对数组重新定义，这可以用：Erase语句来实现。
　　格式：Erase(数组名)[，(数组名)]
　　功能：用于重新初始化静态数组的元素，或者释放动态数组的存储空间。
　　例如：
　　Dim T(10)As Integer
　　Erase T
　　examda说明：
　　(1)在Erase语句中，只需给出数组名，不带括号和下标。
　　(2)在Erase语句用于静态数组时，如果这个数组是数值数组，则把数组中的所有数组元素置为0；如果是字符串数组，则把所有数组元素置为空字符串。
　　(3)当把Erase语句用于动态数组时，将删除整个数组结构并释放该数组所占用的内存区。也就是说，动态数组经Erase语句执行后，即不复存在；而静态数组经Erase后，仍然存在，只是其内容被清空。
　　(4)Erase语句释放动态数组所使用的内存，在下一次引用该动态数组之前，必须用ReDim语句，重新定义该数组。