Функция UBound

Забележка: Бихме искали да ви осигурим най-новото помощно съдържание възможно най-бързо на вашия собствен език. Тази страница е преведена чрез автоматизация и може да съдържа граматически грешки и несъответствия. Нашата цел е това съдържание да ви бъде полезно. Можете ли да ни кажете дали информацията е била полезна за вас, в дъното на тази страница? Ето статията на английски за бърза справка.

Връща Long, съдържаща най-голямата наличен индекс за указаната размерност на масив.

Синтаксис

UBound () arrayname [измерение ] )

Синтаксисът на функцията UBound има следните аргументи:

Аргумент

Описание

arrayname

Изисква се. Името на масива променлива; следва стандартен конвенции за именуване на променливи.

измерение

По желание. Вариант (Дълъг). Се връща цяло число, което показва кои измерение горна граница. Използвайте 1 за първото измерение, 2 за втората и т.н. Ако размерност е пропуснато, приема се 1.


Забележки

Функцията UBound се използва с функцията LBound за определяне на размера на масив. Използвайте функцията LBound за намиране на долната граница на измерение масив.

UBound връща стойностите по-долу за масив с тези размери:

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

Декларация

Върната стойност

UBound(A, 1)

100

UBound(A, 2)

3

UBound(A, 3)

4


Пример

Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко израза в полето за търсене.

Този пример използва функцията UBound за определяне на най-голямата наличен индекс за указаната размерност на масив.

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.
Разширете уменията си в Office
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×