Funkce UBound

Vrátí horní hranici pole.

Syntaxe:


UBound (NázevPole [, Rozměr])

Návratová hodnota:

Long

Parametry:

NázevPole: Název pole, jehož horní (Ubound) nebo dolní (LBound) hranici chcete zjistit.

[Rozměr]: Celé číslo určující, u kterého rozměru chcete zjistit horní (Ubound) nebo dolní (LBound) hranici. Pokud není hodnota určena, předpokládá se první rozměr.

Chybové kódy:

5 Neplatné volání procedury

9 Index mimo definovaný rozsah

Příklad:


Sub VectorBounds
    Dim v(10 To 20) As String
    Print LBound(v()) ' vrátí 10
    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()) ' vrátí 10  20
    Print LBound(t(),2) ' vrátí - 5
    Print UBound(t,2) ' vrátí 70
End Sub ' TableBounds

Podpořte nás!