Возвращает значение типа Long, содержащее нижнюю границу размерности для указанного измерения массива.
Синтаксис
LBound ( имя_массива [, измерение ] )
Функция LBound имеет следующие аргументы:
|
Аргумент |
Описание |
|
имя_массива |
Обязательный аргумент. Имя переменной массива; должно удовлетворять стандартным соглашениям об именовании. |
|
измерение |
Необязательный аргумент. Variant (Long). Целое число, указывающее, для какого измерения массива должна быть возвращена нижняя граница. Для первого измерения следует задать значение 1, для второго — 2 и т. д. Если аргумент измерение не указан, используется значение 1. |
Замечания
Функция LBound используется в сочетании с функцией UBound для определения размера массива. Функция UBound позволяет определить верхнюю границу измерения массива.
В таблице приводятся значения, возвращаемые функцией LBound для массива со следующими значениями:
Dim A(1 To 100, 0 To 3, -3 To 4)
|
Оператор |
Возвращаемое значение |
|
LBound(A, 1) |
1 |
|
LBound(A, 2) |
0 |
|
LBound(A, 3) |
-3 |
Нижняя граница по умолчанию для любого измерения равна 0 или 1, в зависимости от оператора OptionBase. Базовый индекс массива, созданного с помощью функции Array, всегда равен нулю независимо от значения Option Base.
Нижней границей массива, размерности которого определены с использованием предложения To в операторах Dim, Private, Public, ReDim или Static, может быть любое целочисленное значение.
Пример
Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.
В этом примере с помощью функции LBound определяется наименьший доступный индекс указанного измерения массива. Чтобы переопределить заданное по умолчанию для базового индекса массива значение 0, следует использовать инструкцию Option Base.
Dim Lower
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Lower = Lbound(MyArray, 1) ' Returns 1.
Lower = Lbound(MyArray, 3) ' Returns 10.
Lower = Lbound(AnyArray)
' Returns 0 or 1, depending on setting of Option Base.
