ubound如何配合循环使用

avatar
作者
猴君
阅读量:7

当需要在循环中对元素进行处理并且需要比较元素的值时,可以使用ubound函数来确定循环的范围。例如,可以使用ubound函数获取数组的上限界限,然后在循环中逐个处理数组的元素。

下面是一个示例代码,演示了如何使用ubound函数来确定循环的范围:

Dim arr(3) As Integer arr(0) = 1 arr(1) = 2 arr(2) = 3 arr(3) = 4  Dim i As Integer Dim total As Integer  For i = LBound(arr) To UBound(arr)     total = total + arr(i) Next i  MsgBox "Total: " & total 

在这个示例中,LBound(arr)返回数组arr的下限界限,通常为0。UBound(arr)返回数组arr的上限界限,这里为3。循环从0到3遍历数组arr,并将元素的值累加到total中。最后,通过消息框显示总和。

广告一刻

为您即时展示最新活动产品广告消息,让您随时掌握产品活动新动态!