Applies ToAccess для Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Возвращает значение типа 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.

Нужна дополнительная помощь?

Нужны дополнительные параметры?

Изучите преимущества подписки, просмотрите учебные курсы, узнайте, как защитить свое устройство и т. д.

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