Funkcija UBound

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Pateikia ilgą skaičių su didžiausią galimi Apatinis indeksas pagal nurodytą dimensiją, yra masyvas.

Sintaksė

UBound ( arrayname [dimensiją ] )

Funkcija UBound sintaksės argumentai:

Argumentas

Aprašas

arrayname

Būtina. Nuskaitomo masyvo kintamasis; matyti standartinę kintamųjų pavadinimų.

dimensiją

Pasirinktinai. Variantas (Ilgas). Sveikasis skaičius, nurodantis, kurią dimensiją viršutinė riba yra grąžinama. Naudoti 1 pirmą dimensijos, 2 antrą, ir pan. Jei dimensijos nenurodytas, laikoma, 1.


Pastabos

Funkcija UBound naudojama funkcija LBound nustatyti masyvo dydį. Naudokite funkciją LBound rasti Apatinė riba yra masyvo dimensijos.

UBound pateikia šias reikšmes masyvą su šiuos aspektus:

Dim A(1 To 100, 0 To 3, -3 To 4)

Patvirtinimas

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 nustatyti didžiausias galimi Apatinis indeksas pagal nurodytą dimensiją masyvo.

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.

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×