VB清空数组_Erase
━━━━━━━━━━━━━━━━━━━━━━━━━
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