Функция Array

Применяется к
Access для Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Возвращает объект, Variant содержащий массив.

Синтаксис

Array(arglist)

Обязательный arglist аргумент — это разделенный запятыми список значений, которые назначены элементам массива в .Variant Если аргументы не указаны, Access создает массив пустой длины.

Замечания

Чтобы сослаться на элемент в массиве, используйте имя переменной, за которым следуют круглые скобки, содержащие номер индекса нужного элемента. В следующем примере первая инструкция создает переменную с именем A .Variant Вторая инструкция присваивает массив A. Последний оператор присваивает значение второго элемента массива другой переменной.

Примечание

В следующих примерах показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Developer Reference (Справочник разработчика ) в раскрывающемся списке рядом с Search (Поиск) и введите один или несколько терминов в поле поиска.

Dim A As Variant
A = Array(10,20,30)
B = A(2)

Нижняя граница массива, созданного Array функцией, определяется нижней границей, указанной в операторе Option Base , если только Array она не дополнена именем библиотеки типов, например VBA.Array, . Если вы определяете его именем библиотеки Option Baseтипов, Array на него не влияет .

Примечание

Ячейка, Variant не объявленная как массив, все же может содержать массив. Переменная Variant может содержать массив любого типа, кроме строк фиксированной длины и пользовательских типов. Ячейка, Variant содержащая массив, концептуально отличается от массива, элементы которого имеют тип Variant, но доступ к элементам массива осуществляется таким же образом.

Пример

В Array этом примере функция используется для возврата объекта Variant , содержащего массив.

Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
' Return values assume the lower bound is set to 1 by using the
' Option Base statement.
MyDay = MyWeek(2)    ' MyDay contains "Tue".
MyDay = MyWeek(4)    ' MyDay contains "Thu".