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

Применение

Объект ListBox

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

выражение.MultiSelect

Выражение Обязательный. Выражение, возвращающее один из объектов в списке Применяется к.

Замечания

Свойство MultiSelect может принимать следующие значения:

Значение

Visual Basic

Описание

Нет

0

(По умолчанию.) Выбор нескольких элементов не допускается.

Простой

1

Можно выбрать несколько элементов или отменить их выбор, щелкая их или нажимая клавишу ПРОБЕЛ.

Со связным выбором

2

Допускается расширение области выделения с помощью нажатия кнопки мыши или клавиши со стрелкой при нажатой клавише SHIFT. Элементы также можно выбирать путем перетаскивания. Щелчок элемента при нажатой клавише CTRL выделяет его или отменяет выбор.

Примечание: Вы можете задать свойство MultiSelect с помощью Окно свойств списка, кода макрос или Visual Basic для приложений (VBA).

Это свойство можно задать только в режиме конструктора формы.

Свойство ListIndex возвращает номер индекса для выбранного элемента. Если свойство MultiSelect имеет значение "Простой" или "Со связным выбором", с помощью свойства Selected или коллекции ItemsSelected списка можно определить выбранные элементы. Кроме того, если свойству MultiSelect присвоено значение "Простой" или "Со связным выбором", элемент управления списка всегда будет иметь значение Null.

Если для свойства MultiSelect задано значение "Со связным выбором", то при обновлении списка все выбранные пользователем значения будут отменены.

Пример

Чтобы получить значение свойства MultiSelect для списка Country формы Order Entry, можно использовать следующий синтаксис:

Dim b As Byteb = Forms("Order Entry").Controls("Country").MultiSelect

Для задания значения свойства MultiSelect применяется следующий синтаксис:

Forms("Order Entry").Controls("Country").MultiSelect = 2 ' Extended.

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

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

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