none

解决方案 »

  1.   

    用Lbound(数组名)可取得数组下标,包括动态数组用UBound(数组名)可取得数组定义的上标
      

  2.   

    判断数组下标极限值。 LBound, UBound 
    该示例使用 Option Base 语句来取代数组下标的缺省值 0。LBound 函数返回数组的指定维数的最小可用下标。Option Base 语句只能在模块级使用。Option base 1   '将缺省的数组下标设为 1。Dim Lower
    Dim MyArray(20), TwoDArray(3, 4)   '声明数组变量。
    Dim ZeroArray(0 To 5)   '取代缺省的下标。
    '使用 LBound 函数来测试数组的下界。
    Lower = LBound(MyArray)   '返回 1。
    Lower = LBound(TwoDArray, 2)   '返回 1。
    Lower = LBound(ZeroArray)   '返回 0。
      

  3.   

    UBound(Array1)就可以取到下标了