VB中Erase语句的使用方法详解

VB中Erase语句的使用方法详解

在VB（Visual Basic）中，Erase语句用于重新初始化固定大小数组的元素，并释放动态数组的存储空间。Erase语句的语法如下：

Erase array

其中，array是要清除的数组变量的名称。

使用Erase语句的注意事项

固定大小数组

对于固定大小数组（常规数组），Erase语句将每个元素设置为0（对于数值数组）或零长度字符串（对于字符串数组），并将对象数组中的每个元素设置为特殊值Nothing。

动态数组

对于动态数组，Erase语句会释放数组所使用的内存。在程序再次引用该动态数组之前，必须使用ReDim语句来重新定义该数组变量的维数。

示例代码

固定大小数组示例

Dim NumArray(3) As String
NumArray(0) = "VBScript"
NumArray(1) = 1.05
NumArray(2) = 25
NumArray(3) = 23/04/2013
' 重新初始化固定大小数组
Erase NumArray
' 输出数组元素
msgbox "The value at Zeroth index of NumArray is " & NumArray(0)
msgbox "The value at First index of NumArray is " & NumArray(1)
msgbox "The value at Second index of NumArray is " & NumArray(2)
msgbox "The value at Third index of NumArray is " & NumArray(3)

动态数组示例

Dim DynamicArray() As Integer
ReDim DynamicArray(9)
' 分配存储空间并赋值
DynamicArray(0) = 100
DynamicArray(1) = 200
DynamicArray(2) = 300
' 释放动态数组内存
Erase DynamicArray
' 再次使用动态数组前需要重新定义
ReDim DynamicArray(9)
DynamicArray(0) = 1000
DynamicArray(1) = 2000
DynamicArray(2) = 3000

总结

Erase语句在VB中用于清除数组的元素并释放动态数组的内存。对于固定大小数组，它会重新初始化数组元素；对于动态数组，它会释放内存，需要再次使用前重新定义数组。在使用Erase语句时，应注意区分数组的类型，并根据需要重新定义数组变量。

本文原文来自cxsw168.com