Vraća dugu vrijednost koja sadrži najveći dostupan indeks za naznačenu dimenziju polje.
Sintaksa
UBound ( naziv polja [, dimenzija ] )
Sintaksa funkcije UBound sadrži ove argumente:
Argument |
Opis |
naziv polja |
Obavezno. Naziv polja varijabla; slijedi standardne konvencije o imenovanju varijabli. |
dimenzija |
Neobavezno. Variant (dugo). Cijeli broj koji označava koja je gornja granica dimenzije vraćena. Koristite 1 za prvu dimenziju, 2 za drugu i tako dalje. Ako izostavite dimenziju, 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 sljedećih dimenzija:
Dim A(1 To 100, 0 To 3, -3 To 4)
Izjava |
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 koristi funkcija UBound za određivanje najvećeg dostupnog indeksa 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.