本帖最后由 hwc2ycy 于 2014-3-5 09:12 编辑
与数组有关的VBA函数与语句 1. 下标函数lbound 语法:lbound(数组,[维数]) 返回一个 Long 型数据,其值为指定数组维可用的最小下标(某一维索引号的开始值)。 当省略维数参数时,默认为第1维。 示例1 :
示例1 效果图:
2.上标函数ubound
返回一个 Long 型数据,其值为指定的数组维可用的最大下标(某一维索引号的结束值)。 当省略维数参数时,默认为第1维。 示例2 :
示例2 效果图:
通过ubound与lbound配合,可以确定数组某一维元素的个数。 示例3 :
示例3 效果图:
在实际的数组循环中,特别是当从单元格中读取数据时,如果不能确定数组大小的情况下,应使用上下标函数来确定数组循环的开始值与结束值而避免用常量值表示数组的上下标值,这样能增加代码的通用性与可读性。
3.Array函数
返回一个包含数组的 Variant变量,通常用来快速生成数组(并赋值)。 语法:Array([参数列表]) 参数列表是一个用逗号隔开的值表,这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数,则创建一个长度为 0 的数组。 参数列表内部可以嵌套array语句。 示例5 :
代码F8 后本地窗口截图:
注意上图中不带参数生成的arr4。常规定义时,数组的下标是小于或等于上标的。
|