通过

Option Base 语句

  • 项目

在 模块级别 用于声明 数组 下标的默认下限。

语法

Option Base { 0 | 1 }

备注

由于默认基数为 0，因此不需要 Option Base 语句。 如果使用，则该语句必须出现在模块中的任何过程之前。 Option Base 只能在模块中出现一次且必须位于包含维度的数组声明前面。

注意

[!注释] Dim 、 Private 、 Public 、 ReDim 和 Static 语句中的 To 子句提供了一种控制数组下标范围的更灵活的方法。 不过，如果您没有使用 To 子句明确设置下限，则可以使用 Option Base 将默认下限更改为 1。 使用 ParamArray 关键字创建的数组的基数为零; 选项基 不影响 ParamArray (或 Array 函数，如果用其类型库的名称（例如 VBA）进行限定。数组) 。

Option Base 语句只影响该语句所在模块中的数组下限。

示例

此示例使用 Option Base 语句覆盖默认基数数组下标值 0。 LBound 函数返回数组的指示维度的最小可用下标。 Option Base 语句只在模块级别使用。

Option Base 1 ' Set default array subscripts to 1. 
 
Dim Lower 
Dim MyArray(20), TwoDArray(3, 4) ' Declare array variables. 
Dim ZeroArray(0 To 5) ' Override default base subscript. 
' Use LBound function to test lower bounds of arrays. 
Lower = LBound(MyArray) ' Returns 1. 
Lower = LBound(TwoDArray, 2) ' Returns 1. 
Lower = LBound(ZeroArray) ' Returns 0.

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。