在下面这一篇文章中,将和大家分享一下如何计算数组的大小。
1. 打开Excel文件,点击“开发工具”选项卡,打开Visual Basic。
2. 添加一个模块和新过程,称之为“test”。
3. 在过程中先定义一个数组变量arr。
4. 为数组赋值,在此直接引用单元格区域A1至A6,单元格区域中有一些简单的数据做示例。
5. 使用MsgBox返回数组所存数据的总数;然后Ubound用于计算数组的上限,即可以得到数组中所有数据的个数。
Sub test()
Dim arr()
arr = Range("A1:A6")
MsgBox Ubound(arr)
End Sub
6. 执行以上代码后,可以看到弹窗显示为“6”,说明该数组中一共有6个数据,与上面所设置的数组范围是相符合的。
7. 同理,使用Lbound返回数组的下限;关于Ubound和Lbound可以这样理解:在定义数组时,可以规定数组的范围,如“Dim arr(1 To 6)”,Ubound返回的就是数组中的“6”,反之Lbound返回的就是“1”。
Sub test1()
Dim arr()
arr = Range("A1:A6")
MsgBox Lbound(arr)
End Sub
关于数组的其他学习和应用,可以参考以下文章: