Поделиться через


Функция UBound

Возвращает тип данных Long , содержащий наибольший доступный индекс для указанного измерения массива.

Синтаксис

UBound(arrayname, [ dimension ])

Синтаксис функции UBound состоит из следующих частей.

Part Описание
arrayname Обязательно. Имя переменной массива; соответствует стандарту соглашений об именовании переменных.
Размер Необязательный аргумент. Variant (Long). Целое число, указывающее, какая верхняя граница измерения возвращается. Используйте 1 для первого измерения, 2 для второго и т. д. Если измерение опущено, предполагается значение 1.

Замечания

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

UBound возвращает следующие значения для массива с этими измерениями:

Statement Возвращаемое значение
UBound(A, 1) 100
UBound(A, 2) 3
UBound(A, 3) 4

Пример

В этом примере функция UBound используется для определения самого большого доступного индекса указанного измерения массива.

Dim Upper
Dim MyArray(1 To 10, 5 To 15, 10 To 20)    ' Declare array variables.
Dim AnyArray(10)
Upper = UBound(MyArray, 1)    ' Returns 10.
Upper = UBound(MyArray, 3)    ' Returns 20.
Upper = UBound(AnyArray)      ' Returns 10.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.