Vrátí hodnotu typu Long (Typ dat Long: Základní typ dat pro ukládání velkých celých čísel. Proměnná typu Long je uložena jako 32bitové číslo v rozmezí od -2 147 483 648 do 2 147 483 647.), která obsahuje nejvyšší dostupný dolní index pro uvedený rozměr pole (Pole: Proměnná obsahující konečný počet prvků, které mají společný název a typ dat. Každý prvek v poli je označen jedinečným indexem. Změny provedené u jednoho prvku v poli nemají na ostatní prvky žádný vliv.).
Syntaxe
UBound(název_pole [,
rozměr ] )
Syntaxe funkce UBound zahrnuje tyto argumenty:
Poznámky
Funkce UBound společně s funkcí LBound slouží k určení velikosti pole. K určení dolní meze rozměru pole použijte funkci LBound.
Pro trojrozměrné pole vrátí funkce UBound následující hodnoty:
Dim A(1 To 100, 0 To 3, -3 To 4)
| Příkaz |
Návratová hodnota |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Příklad
Poznámka: Následující příklady uvádějí použití této funkce v modulu jazyka Visual Basic for Applications (VBA). Další informace o práci s jazykem VBA získáte tak, že klepnete na položku Referenční informace pro vývojáře v rozevíracím seznamu vedle pole Hledat a do pole pro hledání zadáte jeden nebo více pojmů.
V tomto příkladu je pomocí funkce UBound určen nejvyšší dostupný dolní index určeného rozměru pole.
Dim Upper
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Returns 10.
Upper = UBound(MyArray, 3) ' Returns 20.
Upper = UBound(AnyArray) ' Returns 10.