Napomena: Želimo da vam što pre pružimo najnoviji sadržaj pomoći čim na vašem jeziku. Ova stranica je prevedena automatski i može da sadrži gramatičke greške ili netačnosti. Naš cilj je da ovaj sadržaj bude koristan. Možete li nam na dnu ove stranice saopštiti da li su vam informacije bile od koristi? Ovo je članak na engleskom jeziku za brzu referencu.
Daje dugo koja sadrži najveću moguću vrednost zadate dimenzije nekog sa niz.
Sintaksa
UBound ( imeniza [dimenzija ] )
Sintaksa funkcije UBound ima sledeće argumente:
Argument | Opis |
---|---|
imeniza |
Obavezno. Ime niza promenljiva; Prati standardne konvencije za imenovanje promenljive. |
dimenzija |
Opcionalno. Varijante (Vremena). Dobija se ceo broj koji označava koje dimenzije gornja granica. Koristite 1 za prvu dimenziju, 2 za drugu i tako dalje. Ako dimenzije izostavljen, pretpostavlja se 1. |
Primedbe
Funkcija UBound se koristi sa funkcijom LBound da odredite veličinu niza. Koristite funkciju LBound da biste pronašli donja granica dimenzije niza.
UBound vraća sledeće vrednosti za niz ovih dimenzija:
Dim A(1 To 100, 0 To 3, -3 To 4)
Naredba | Povratna vrednost |
---|---|
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Primer
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Ako vam je potrebno više informacija o radu sa VBA modulom, izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite jedan ili više termina u polje za pretragu.
Ovaj primer koristi funkciju UBound da biste utvrdili najveću moguću vrednost zadate dimenzije niza.
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.