Tagastab pika täisarvu koos massiivi määratud dimensiooni suurima allindeksiga.
Süntaks
UBound ( arrayname [, dimension ] )
Funktsiooni UBound süntaksil on järgmised argumendid.
Argument |
Kirjeldus |
massiivi_nimi |
Nõutav. Massiivi muutuja nimi; määratakse muutuja nimetamise tavareeglite kohaselt. |
dimensioon |
Valikuline. Variant (Pikk täisarv). Tagastatakse dimensiooni ülempiiri tähistav täisarv. Kasutage esimese dimensiooni tähistamiseks arvu 1, teise tähistamiseks arvu 2 jne. Kui dimensiooni ei ole märgitud, eeldatakse, et see on 1. |
Kommentaarid
Funktsiooni UBound kasutatakse koos funktsiooniga LBound selleks, et määrata kindlaks massiivi suurus. Funktsiooni LBound saab kasutada massiivi dimensiooni alampiiri leidmiseks.
Funktsioon UBound tagastab näidatud dimensiooniga massiivide korral järgmised väärtused.
Dim A(1 To 100, 0 To 3, -3 To 4)
Lause |
Tagastusväärtus |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Näide
Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.
Selles näites kasutatakse funktsiooni UBound ja määratakse näidatud dimensiooniga massiivi jaoks suurim võimalik allindeks.
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.