option base:在模块级别中使用,用来声明数组下标的缺省下界。
option base后面只能是0或者1。
由于默认是0 ,所以取0的时候可以不用option base语句。
只有当用Option Base 语句来取代数组下标的缺省值 0时,才有必要用option base 1,而且只能是option base 1而不能是其它的数字。
语句范例:
Dim MyArray(20), TwoDArray(3, 4) '声明数组变量。
Dim ZeroArray(0 To 5) '取代缺省的下标。 '使用LBound 函数来测试数组的下界。
Debug.Print LBound(MyArray) '返回1。
Debug.Print LBound(TwoDArray) '返回1。
Debug.Print LBound(ZeroArray) '返回0。
运行结果:
1
1
0
Dim、Private、Public、ReDim 以及 Static 语句中的 To 子句提供了一种更灵活的方式来控制数组的下标。不过,如果没有使用 To 子句显式地指定下界,则可以使用 Option Base 将缺省下界设为 1。
使用 Array 函数或 ParamArray 关键字创建的数组的下界为 0;Option Base 对 Array 或 ParamArray 不起作用。Option Base 语句只影响位于包含该语句的模块中的数组下界。