Vraća vrijednost Long koja sadrži indeks s najvećim dostupnim indeksom za naznačenu dimenziju polja.
Sintaksa
UBound(nazivpolja [, dimenzija ] )
Sintaksa funkcije UBound sadrži ove argumente:
| Argument | Opis |
|---|---|
| nazivpolja | Obavezno. naziv varijable polja; slijedi standardne konvencije za imenovanje varijabli. |
| dimenzija | Neobavezno. Variant (dugo). Cijeli broj koji označava gornju granicu dimenzije. Koristite 1 za prvu dimenziju, 2 za drugu i tako dalje. Ako se dimenzija izostavi, pretpostavlja se da je 1. |
Napomene
Funkcija UBound koristi se s funkcijom LBound za određivanje veličine polja. Pomoću funkcije LBound pronađite donju granicu dimenzije polja.
UBound vraća sljedeće vrijednosti za polje ovih dimenzija:
Dim A(1 To 100, 0 To 3, -3 To 4)
| Naredba | Vraćena vrijednost |
|---|---|
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Primjer
Napomena
Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.
U ovom se primjeru pomoću funkcije UBound određuje najveći dostupan indeks za naznačenu dimenziju polja.
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.