Syntax
|
UBound
(ArrayVariable() [,dimension])
|
Description
|
Returns an
Integer
containing the upper bound of the specified dimension of the specified array variable.
|
Comments
|
The dimension parameter is an integer that specifies the desired dimension. If not specified, then the upper bound of the first dimension is returned.
The
UBound
function can be used to find the upper bound of a dimension of an array returned by an OLE automation method or property:
UBound(object.property [,dimension])
UBound(object.method [,dimension])
|
Example
|
This example dimensions two arrays and displays their upper bounds.
Const crlf = Chr$(13) + Chr$(10)
Sub Main()
Dim a(5 To 12)
Dim b(2 To 100,9 To 20)
uba = UBound(a)
ubb = UBound(b,2)
MsgBox "The upper bound of a is: " & uba & crlf & " The upper bound of b is: " & ubb
|
|
This example uses Lbound and Ubound to dimension a dynamic array to hold a copy of an array redimmed by the FileList statement.
Dim fl$()
FileList fl$,"*"
count = Ubound(fl$)
If ArrayDims(a) Then
Redim nl$(Lbound(fl$) To Ubound(fl$))
For x = 1 To count
nl$(x) = fl$(x)
Next x
MsgBox "The last element of the new array is: " & nl$(count)
End If
End Sub
|
See Also
|
LBound (function); ArrayDims (function); Arrays (topic).
|