vb定义一个二维数组，求各维上下界

Question

private sub form_click()
Dim A(1 to 10)
print Lbound(A,1),ubound(A,1)
print Lbound(A,2),ubound(A,2)
如Lbound(A,1)中，括号里面的A和1分别是什么意思？

Answer 1

数组名，不可缺省

语法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 语句可以用任何整数作为下界。

参考资料：http://baike.baidu.com/view/1229898.htm

Answer 2

A表示Dim A(1 to 10)中的数组名称

1表示数组维数，第一维是1，第二维是2.

本例中，A只有1维，所以print Lbound(A,2),ubound(A,2)会出错。本回答被提问者采纳

Answer 3

UP