5.4 Флажок (CheckBox)

Назначение

Выбор одного из двух значений: Да/Нет, Включить/Выключить и т.п. это элемент управления, который можно отмечать (ставить «галочку»). Возможно и третье состояние – отмечен, но недоступен.

Свойства

Самое важное свойство флажка – его значение (Value), которое может принимать значения:

• 0 – не отмечен;

• 1 – отмечен;

• 2 – отмечен но недоступен.

События

Главное событие – Click.

5.5 Переключатель (OptionButton)

Назначение

Установка только одной позиции из группы. Каждая группа переключателей помещается в отдельный контейнер, например Frame. Форма является контейнером по умолчанию.

Свойства

Значение переключателя Value, определяющее его состояние:True(включен) илиFalse(выключен).

События

Главное – Click.

5.6 Список (ListBox)

Назначение

Выбор из списка одного или нескольких элементов. В любое время в список можно добавить новые элементы или удалить существующие. При отображении в списке может появиться полоса прокрутки.

Свойства

Самый простой способ получить текст выбранного элемента – свойство Техt. Индекс выбранного элемента - свойствоListIndex. Доступ к нужному элементу списка можно осуществить по его индексу с помощью свойстваList(). Текущее количество элементов в индексе определяется свойствомListСount. Получить выбранный элемент можно также комбинируя свойстваList()иListIndex:

Str=LstBox.List(LstBox.ListIndex)

Это тоже, что и:

Str=LstBox.Text

Если не выбран ни один элемент, значение свойства ListIndexравно –1, а свойстваText– пустая строка.

Свойство Sortedопределяет способ расположения элементов в списке (сортировку). Если установить это свойство, то все элементы будут сортироваться по алфавиту, даже если они были добавлены с указанием индекса.

Свойство ItemData()позволяет для каждого элемента списка задать какое-то число (код, индивидуальный номер и т.п.), не зависящий от порядка расположения элементов в списке (сортировки). При этом для получения индекса последнего добавленного элемента можно воспользоваться свойствомNewIndex. например добавление в список сотрудника Иванов с индивидуальным номером 52431:

LstPersonal.AddItem “Иванов”

LstPersonal.ItemData(LstPersonal.NewIndex)=52431

Свойство MultiSelectдает возможность пользователю выбрать одновременно несколько значений (множественный выбор):

• 0 – множественный выбор невозможен (можно выбрать только один элемент);

• 1 – простой множественный выбор. Элементы списка выбираются щелчком мыши или нажатием пробела;

• 2 – расширенный множественный выбор. При выборе можно использовать клавиши ShiftиCtrl.

При множественном выборе свойство Textсодержит текст последнего выбранного элемента. Для обработки всех выбранных элементов следует воспользоваться свойствомSelected()каждого элемента списка, которое показывает выделен ли элемент списка (True) или нет (False). Например,

If LstPersonal.Selected(2) Then

Str= LstPersonal.List(2)

End If

События

Основное – Click, возникающее при выборе элемента в списке (с помощью мыши или клавиши управления).

Методы

Для добавления новых элементов в список используется метод AddItem, а для удаления –RemoveItem. При добавлении следует указать значение добавляемого элемента и его индекс – место вставки в список. Индексация начинается с нуля. Если индекс не задан – вставка в конец списка. Для удаления достаточно задать только индекс. Как правило, заполнение списка осуществляется при загрузке формы;

Private Sub Form_Load

LstBox.AddItem “Э-01-1”

LstBox.AddItem “Э-01-2”

LstBox.AddItem “Э-01-3”

End Sub

Пример удаления третьего элемента списка:

LstBox.RemoveItem 2

Для удаления всех элементов – метод Clear:

LstBox.Clear