Pateikia ilgą reikšmę, kurioje yra didžiausias galimas nurodytos masyvo dimensijos apatinis indeksas.
Sintaksė
UBound(masyvo pavadinimas [, dimensija ] )
Funkcijos UBound sintaksę sudaro šie argumentai:
| Argumentas | Aprašymas |
|---|---|
| masyvo pavadinimas | Būtinas. Masyvo kintamojo pavadinimas; Atitinka standartines kintamųjų pavadinimų suteikimo konvencijas. |
| dimensija | Pasirinktinis. Variant (ilgas). Sveikasis skaičius, nurodantis, kurios dimensijos viršutinė riba grąžinama. Naudokite 1 pirmajam matmeniui, 2 – antrajam ir t. t. Jei dimensija praleista, naudojama 1. |
Pastabos
Funkcija UBound naudojama kartu su funkcija LBound masyvo dydžiui nustatyti. Naudokite funkciją LBound , kad rastumėte apatinę masyvo dimensijos ribą.
UBound grąžina šias masyvo su šiomis dimensijomis reikšmes:
Dim A(1 To 100, 0 To 3, -3 To 4)
| Pareiškimas | 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 funkcija UBound naudojama didžiausiam galimam nurodytos masyvo dimensijos apatiniam indeksui nustatyti.
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.