Dim a() as String
...
...
ReDim a(10)在ReDim之前怎样判断该数组是否已经被重定义过?

解决方案 »

  1.   

    用Ubound(a)查看动态数组的长度
      

  2.   

    用Redim Preserve a(10) 重新定义动态数组的大小可以保持数组中原有的值
      

  3.   

    建议是定义完后,最好能在最早就把他先redima(0),这样避免出错!因为是动态数组,所以只要每次用都redim即可。
      

  4.   

    //在redim之前ubound(a)出错出错意味着可以用错误陷阱捕获:)
      

  5.   

    我现在就是用陷阱捕获的。但是觉得很麻烦。
    on error resume next
    n=ubound(a)
    if err.number<>0 then n=0
    on error goto 0
      

  6.   

    记得以前有篇帖子专门讲Null,Empty和Nothing的,其中好像讲了这个问题。
    可惜找不到了