vb6 中erase作用 他把所有值还原 有什么意义吗?

来源:百度知道 编辑:UC知道 时间:2024/06/25 21:47:59
为什么要还原 给个例子呗

erase是清空数组用的,可以删除已存在的数据以释放内存
比如:

Private Sub Command1_Click()
Dim strArr() As String '声明
Dim i As Integer

strArr = Split("aaa,bbb,ccc,ddd", ",") '给数组赋值
For i = 0 To UBound(strArr)
MsgBox "strArr(" & i & ")=" & strArr(i) '显示数据
Next
Erase strArr() '清空数组,释放内存
'Msgbox strArr(0) '这里如果再访问数组就报错了
End Sub

Erase 语句

重新初始化大小固定的数组的元素,以及释放动态数组的存储空间。

语法

Erase arraylist

所需的 arraylist 参数是一个或多个用逗号隔开的需要清除的数组变量。

说明

Erase 根据是固定大小(常规的)数组还是动态数组,来采取完全不同的行为。Erase 无需为固定大小的数组恢复内存。Erase 按下表来设置固定数组的元素:

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

Erase 释放动态数组所使用的内存。在下次引用该动态数组之前,程序必须使用 ReDim 语句来重新定