Pateikia ilgą skaičių su didžiausiu galimu nurodyto masyvas matmens apatiniu indeksu.
Sintaksė
UBound ( masyvo pavadinimas [, dimensija ] )
Funkcijos UBound sintaksė turi tokius argumentus:
Argumentas |
Aprašas |
masyvo pavadinimas |
Būtinas. Masyvo kintamasis pavadinimas ; atitinka standartines kintamųjų pavadinimų suteikimo konvencijas. |
dimensija |
Pasirinktinis. Variant (ilgas). Sveikasis skaičius, nurodantis grąžinamą dimensijos viršutinę ribą. Naudokite 1 pirmajam matmenims, 2 – antram ir t. t. Jei dimensija nenurodyta, laikoma, kad naudojama 1. |
Pastabos
Funkcija UBound naudojama su funkcija LBound masyvo dydžiui nustatyti. Naudokite funkciją LBound , kad rastumėte apatinę masyvo dimensijos ribą.
UBound pateikia šias masyvo, turinčio šias dimensijas, reikšmes:
Dim A(1 To 100, 0 To 3, -3 To 4)
Nuostatos |
Pateikiama reikšmė |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Pavyzdys
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje naudojama funkcija UBound , kad būtų nustatytas didžiausias galimas nurodyto masyvo dimensijos apatinis indeksas.
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.