Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
курсовая / Источники / excel_2010_professionalnoe_programmirovanie_na_vba_RuLit_Me_412629.pdf
Скачиваний:
4
Добавлен:
27.09.2025
Размер:
22.97 Mб
Скачать

Глава 14. Примеры пользовательских форм

455

К о м п а к т-д и ск

Рассматриваемый в этом разделе пример находится на прилагаемом к кни­ ге компакт-диске (в файле lis t b o x uniqu e ite m s i .xlsm ). В рабочей кни­ ге lis t b o x u niqu e ite m s 2 .xlsm находится более сложный пример, выво­ дящий на экран отсортированные элементы.

Определение выделенного элемента списка

В примерах, рассмотренных в предыдущих разделах, отображалось диалоговое окно UserForm с элементом управления L is tB o x , который содержит список из нескольких элементов. Эти процедуры не включают главной функции: определения опции или оп­ ций, которые выбраны пользователем.

• ч П рим ечание

В дальнейшем будет рассматриваться элемент управления L is tB o x с од­ ним выделенным элементом списка — его свойство M u ltis e le c t должно иметь значение о.

Чтобы определить, какой элемент списка выбран, необходимо узнать значение свой­ ства V a lu e элемента управления L is tB o x . Оператор, показанный ниже, отображает текст выделенного в объекте L i s t B o x l элемента.

MsgBox L is tB o x l.V a lu e

Если не выбран ни один элемент списка, то выполнение оператора приведет к воз­ никновению ошибки.

Чтобы узнать расположение выделенного элемента в списке (а не только его содер­ жимое), воспользуйтесь значением свойства L i s t l n d e x элемента управления

ListBox.

В следующем примере демонстрируется простое окно сообщения, в котором указан номер выделенной позиции элемента управления L is tB o x .

MsgBox "Вы выбрали позицию #" & L is t B o x l. L is tln d e x

Если не выделен ни один элемент списка, свойство L i s t l n d e x возвращает значение -1 .

П рим ечание

Нумерация позиций в элементе управления L is tB o x начинается с о, а не c l . Таким образом, значение свойства L is tln d e x для первого элемента будет о, а для последнего элемента значение свойства соответствует значе­ нию свойства L is tc o u n t, равному 1.

Определение нескольких выделенных элементов списка

Свойство M u l t i S e l e c t элемента управления L is t B o x может принимать одно из трех приведенных ниже значений.

0 (fm M u lti S e l e c t S in g le ) . Может быть выбран только один элемент. Эта ус­ тановка задана по умолчанию.

• 1 (fm M u lti S e l e c t M u lti) . Нажмите клавишу пробела или щелкните мышью для выделения (отмены выделения) элементов в списке.