vb中ubound怎麽用

就是取數組的最大下標。

格式：Ubound(數組，第幾維)

給壹段代碼，運行壹下：

新建壹窗體，然後到代碼區，刪除所有代碼後，粘貼以下代碼，可見運行效果：

Private?Sub?Form_Load()

Dim?A(10)?As?String

Dim?B(3,?6)?As?Long

Dim?C(5,?9,?2)?As?String

Dim?i,?j,?k,?n?As?Long

i?=?UBound(A)?'取壹維數組的最大下標，結果是10

j?=?UBound(B,?2)?'取二維數組第二維的最大下標，結果是6

k?=?UBound(C,?3)?'取三維數組第三維的最大下標，結果是2

n?=?UBound(C,?2)?'取三維數組的第二維最大下標，結果是9

Debug.Print?i,?j,?k,?n

End?Sub

運行結果，在立即窗口裏出現：

10 629