Funktion UBound
Gibt die obere Begrenzung eines Arrays zurück.
UBound (ArrayName [, Dimension])
Long
ArrayName: Der Name des Arrays, dessen obere (UBound) oder untere (LBound) Begrenzung Sie bestimmen möchten.
[Dimension]: Integer-Wert, der angibt, für welche Dimension die obere (UBound) oder untere (LBound) Begrenzung zurückgegeben werden soll. Wenn Sie hier keinen Wert angeben, wird die Begrenzung der ersten Dimension zurückgegeben.
Sub VectorBounds
Dim v(10 To 20) As String
Print LBound(v()) ' Gibt 10 zurück
Print UBound(v) ' returns 20
End Sub ' VectorBounds
Sub TableBounds
Dim t(10 To 20,-5 To 70) As Currency
Print LBound(t), UBound(t()) ' Gibt 10 20 zurück
Print LBound(t(),2) ' Gibt -5 zurück
Print UBound(t,2) ' Gibt 70 zurück
End Sub ' TableBounds