Pateikia ilgą masyvas rodomą didžiausią esamą apatinį indeksą.
Sintaksė
UBound ( arrayname [, dimensija ] )
Funkcijos UBound sintaksė turi tokius argumentus:
|
Argumentas |
Aprašas |
|
"arrayname" |
Būtinas. Masyvo kintamasis pavadinimas; laikomasi standartinių kintamųjų vardų suteikimo konvencijų. |
|
dimensija |
Pasirenkama. Variant (ilgas). Sveikasis skaičius, nurodantis, kuris matmuo yra viršutinis. Naudokite 1 pirmajai dimensijai, 2 – antrajam ir kt. Jei matmuo praleistas, laikoma, kad 1 yra. |
Pastabos
Funkcija UBound naudojama su funkcija LBound , skirta masyvo dydžiui nustatyti. Naudokite funkciją LBound , kad rastumėte apatinę masyvo dimensijos ribą.
" UBound " pateikia šių dimensijų masyvo reikšmes:
Dim A(1 To 100, 0 To 3, -3 To 4)
|
Sakinys |
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 " UBound " funkcija, kad būtų nustatytas didžiausias galimas Apatinis indeksas nurodytai masyvo dimensijai.
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.
