Ubound 在VB中怎么用啊！

假设：

Dim a() As Integer

ReDim a(100) '重定义数组为101个元素

保留原有数组信息，新增一个元素：

ReDim Preserve a(UBound(a) + 1) '至此数组元素有102个

（若不需保留原有数组信息，去掉Preserve关键字即可。）

UBound(a, 1)表示取数组a的第1维的上限

UBound(a, 2)表示取数组a的第2维的上限

依次类推

你举例的：UBound(a, 1)=3

UBound(a,2)=3

返回一个 Long 型数据，其值为指定数组维可用的最小下标。

语法

LBound(arrayname[, dimension])

LBound 函数的语法包含下面部分：

部分 描述

arrayname 必需的。数组变量的名称，遵循标准的变量命名约定。

dimension 可选的；Variant (Long)。指定返回哪一维的下界。1 表示第一维，2 表示第二维，如此类推。如果省略 dimension，就认为是 1。

说明

LBound 函数与 UBound 函数一起使用，用来确定一个数组的大小。UBound 用来确定数组某一维的上界。

对具有下述维数的数组而言，LBound 的返回值见下表：

Dim A(1 To 100, 0 To 3, -3 To 4)

语句 返回值

LBound(A, 1) 1

LBound(A, 2) 0

LBound(A, 3) -3

所有维的缺省下界都是 0 或 1，这取决于 Option Base 语句的设置。使用 Array 函数创建的数组的下界为 0；它不受 Option Base 的影响。

对于那些在 Dim 中用 To 子句来设定维数的数组而言，Private、Public、ReDim 或 Static 语句可以用任何整数作为下界。

返回一个 Long 型数据，其值为指定的数组维可用的最大下标。

语法

UBound(arrayname[, dimension])

UBound 函数的语法包含下面部分：

部分 描述

arrayname 必需的。数组变量的名称，遵循标准变量命名约定。

dimension 可选的；Variant (Long)。指定返回哪一维的上界。1 表示第一维，2 表示第二维，如此等等。如果省略 dimension，就认为是 1。

说明

UBound 函数与 LBound 函数一起使用，用来确定一个数组的大小。LBound 用来确定数组某一维的上界。

对具有下述维数的数组而言，UBound 的返回值见下表：

Dim A(1 To 100, 0 To 3, -3 To 4)

语句 返回值

UBound(A, 1) 100

UBound(A, 2) 3

UBound(A, 3) 4

LBound 函数示例

该示例使用 LBound 函数来返回数组的指定维数的最小可用下标。可以使用 Option Base 语句取代数组缺省下标值 0。

Dim Lower

Dim MyArray(1 To 10, 5 To 15, 10 To 20) '声明数组变量。

Dim AnyArray(10)

Lower = Lbound(MyArray, 1) '返回 1。

Lower = Lbound(MyArray, 3) '返回 10。

Lower = Lbound(AnyArray) '返回 0 或 1，取决于

'Option Base 的设置。

UBound 函数示例

该示例使用 UBound 函数，确定数组的指定维的最大可用下标。

Dim Upper

Dim MyArray(1 To 10, 5 To 15, 10 To 20) '声明数组变量。

Dim AnyArray(10)

Upper = UBound(MyArray, 1) '返回 10。

Upper = UBound(MyArray, 3) '返回 20。

Upper = UBound(AnyArray) '返回 10。

VB中的Ubound和LBound是用来获取指定数组维可用的最大和最小下标值。

UBound 函数，返回一个 Long 型数据，其值为指定的数组维可用的最大下标。

UBound 函数示例

该示例使用 UBound 函数，确定数组的指定维的最大可用下标。

Dim Upper

Dim MyArray(1 To 10, 5 To 15, 10 To 20)   '声明数组变量。

Dim AnyArray(10)

Upper = UBound(MyArray, 1)   '返回 10。

Upper = UBound(MyArray, 3)   '返回 20。

Upper = UBound(AnyArray)   '返回 10。

LBound 函数，返回一个 Long 型数据，其值为指定数组维可用的最小下标。

LBound 函数示例

该示例使用 LBound 函数来返回数组的指定维数的最小可用下标。可以使用 Option

Base 语句取代数组缺省下标值 0。

Dim Lower

Dim MyArray(1 To 10, 5 To 15, 10 To 20)    '声明数组变量。

Dim AnyArray(10)

Lower = Lbound(MyArray, 1)    '返回 1。

Lower = Lbound(MyArray, 3)   '返回 10。

Lower = Lbound(AnyArray)   '返回 0 或 1，取决于'Option Base 的设置。

以上就是关于Ubound 在VB中怎么用啊！全部的内容，包括:Ubound 在VB中怎么用啊！、二维数组 ubound、VB的LBound和UBond上下界函数的详细格式和功能,作用等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！