怎么清空数组! 在线谢谢

解决方案 »

  1.   

    不知道楼主要做什么,做个循环置空不就行了??????要不你真得试试重新定义一下,用
    ReDim 原来数组
      

  2.   

    如果是动态数组 使用 redim 
    否则 使用 Windows API: ZeroMemory 
      

  3.   

    一般来讲 Redim 就可以了,虽不是效率最高的方法,但对于绝大多数的情况下是足够要求了。
    如果要最高的效率您得看值不值了,因为您可能要多写上几十行的代码。
      

  4.   

    如果你想清空数组里的内容的话,就用循环清空就可以了
    用Redim,重定义一下了
      

  5.   

    Erase 语句重新初始化大小固定的数组的元素,以及释放动态数组的存储空间。语法Erase arraylist所需的 arraylist 参数是一个或多个用逗号隔开的需要清除的数组变量。说明Erase 根据是固定大小(常规的)数组还是动态数组,来采取完全不同的行为。Erase 无需为固定大小的数组恢复内存。Erase 按下表来设置固定数组的元素:数组类型 Erase 对固定数组元素的影响 
    固定数值数组 将每个元素设为 0。 
    固定字符串数组(长度可变) 将每个元素设为零长度字符串 ("")。 
    固定字符串数组(长度固定) 将每个元素设为 0。 
    固定 Variant 数组 将每个元素设为 Empty。 
    用户定义类型的数组 将每个元素作为单独的变量来设置。 
    对象数组 将每个元素设为特定值 Nothing。 
    Erase 释放动态数组所使用的内存。在下次引用该动态数组之前,程序必须使用 ReDim 语句来重新定义该数组变量的维数。
    ---------------------------------------------------
    Erase 语句示例
    该示例使用 Erase 语句重新初始化固定大小的数组中的元素,以及释放动态数组存储空间。'声明数组变量。
    Dim NumArray(10) As Integer   ' Integer 数组。
    Dim StrVarArray(10) As String   '变长的 String 数组。
    Dim StrFixArray(10) As String * 10   '定长的 String 数组。
    Dim VarArray(10) As Variant   'Variant 数组。
    Dim DynamicArray() As Integer   '动态数组。
    ReDim DynamicArray(10)   '分配存储空间。
    Erase NumArray   '将每个元素设为 0。
    Erase StrVarArray   '将每个元素设为
       '零长度字符串 ("")。
    Erase StrFixArray   '将每个元素设为 0。
    Erase VarArray   '将每个元素设为 Empty。
    Erase DynamicArray   '释放数组所用内存。