Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Используйте свойство MultiSelect , чтобы указать, может ли пользователь сделать несколько выборок в списке в форме и как можно сделать несколько выбранных элементов. Чтение и запись байтов.
Синтаксис
expression. Multiselect
Выражение Переменная, представляющая объект ListBox .
Замечания
Свойство MultiSelect использует следующие параметры.
| Setting | Visual Basic | Описание |
|---|---|---|
| Нет | 0 | (по умолчанию) Множественный выбор не допускается. |
| Простой | 1 | Несколько элементов выбираются или отменяются путем выбора их с помощью мыши или нажатия пробела. |
| Долго | 2 | Несколько элементов выбираются, удерживая нажатой клавишу SHIFT и выбирая их мышью, или удерживая нажатой клавишу SHIFT и нажимая клавишу СО СТРЕЛКОЙ, чтобы расширить выбор из ранее выбранного элемента до текущего элемента. Вы также можете выбрать элементы, перетаскивая с помощью мыши. Удерживая нажатой клавишу CTRL, при выборе элемента он выбирается или отменяется выбор. |
Это свойство можно задать только в режиме конструктора формы.
Используйте свойство ListIndex , чтобы вернуть номер индекса для выбранного элемента. Если для свойства MultiSelect задано значение Расширенный или Простой, можно использовать свойство Selected или ItemsSelected коллекции списка , чтобы определить выбранные элементы. Кроме того, если для свойства MultiSelect задано значение Расширенный или Простой, значение элемента управления со списком всегда будет иметь значение NULL.
Если для свойства MultiSelect задано значение Расширенный, при повторном запросе в списке будут сняты все выбранные пользователем параметры.
Пример
Чтобы вернуть значение свойства MultiSelect для списка с именем Страна в форме заказа , можно использовать следующее.
Dim b As Byte b = Forms("Order Entry").Controls("Country").MultiSelect
Чтобы задать свойство MultiSelect , можно использовать следующее.
Forms("Order Entry").Controls("Country").MultiSelect = 2 ' Extended.
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.