亲爱的朋友们,如果你对vbaubound函数用法_ubound函数用法不是很熟悉,那么你来对了地方。今天我将和大家分享一些关于vbaubound函数用法_ubound函数用法的知识,希望能够帮助大家更好地理解这个话题。

本文目录一览

Ubound 在VB中怎么用啊?!

假设:
Dim a() As Integer
ReDim a(100) '重定义数组为101个元素

保留原有数组信息,新增一个元素:
ReDim Preserve a(UBound(a) + 1) '至此数组元素有102个

(若不需保留原有数组信息,去掉Preserve关键字即可。)

返回目录

vb中ubound怎么用

就是取数组的最大下标。

格式:Ubound(数组,第几维)


给一段代码,运行一下:


新建一窗体,然后到代码区,删除所有代码后,粘贴以下代码,可见运行效果:

OptionExplicit

PrivateSubForm_Load()
DimA(10)AsString
DimB(3,6)AsLong
DimC(5,9,2)AsString
Dimi,j,k,nAsLong

i=UBound(A)'取一维数组的最大下标,结果是10
j=UBound(B,2)'取二维数组第二维的最大下标,结果是6
k=UBound(C,3)'取三维数组第三维的最大下标,结果是2
n=UBound(C,2)'取三维数组的第二维最大下标,结果是9
Debug.Printi,j,k,n
EndSub

运行结果,在立即窗口里出现:

10 629

返回目录

如果您觉得本文对您有所帮助,请在文章结尾处点击“顶一下”以表示您的支持。如果您对本文有任何意见或建议,请点击“踩一下”,以便我们改进该篇文章。如果您想了解更多相关内容,请查看文章下方的相关链接。