好像没有什么好办法:
这能用错误处理来捕获,或是检验。
on error goto ErrorHandle
ubound()
exit sub
ErrorHandle:
如果执行到这里,说明越界了

解决方案 »

  1.   

    用isnull()或者inempty()之类的东东试试
      

  2.   

    不知ubound()你是怎么用的,怎么会下标越界呢?能不能说详细点。
      

  3.   

    数组为空,没有元素,一用ubound就出错:下标越界
      

  4.   

    if ubound(MyArray)=-1 then
       为空
    else
       不为空
    end if
      

  5.   

    如果你的数组为空
    所有你对于数组的操作都将出错
    检测的方法就是利用各类错误处理
    例如
    dim j() as string
    dim i as long
    on error resume next 
    i=ubound(j)
    msgbox Err.Number
    你应该明白如何处理了吧,不过这是一个非常不好的编程习惯redim 语句必不可少,起码你应当redim j(0)来正常处理
    你的要求满足了吧,给分吧,