Функция Array

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

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

Синтаксис

Array(arglist)

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

Замечания

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

Примечание

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

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 lower bound set to 1 (using Option Base
' statement).
MyDay = MyWeek(2)    ' MyDay contains "Tue".
MyDay = MyWeek(4)    ' MyDay contains "Thu".