Флажок (CheckBox)

23 24 25 26 27 28 29

End Sub

Unload Me

Wend

End If

n3: НомерСтроки = НомерСтроки + 1

CallСортировка 'Процедура сортировки списка.

'Процедуру сортировки напишите самостоятельно.

frmКафедра.cboКафедра.List = Кафедры

frmКафедра.Show

Для того чтобы узнать, какой элемент списка выбрал пользователь, воспользуемся свойством Value:

Private Sub cmdOK_Click()

Dim Кафедра As String

Кафедра = cboКафедра.Value

MsgBox "Выбрана кафедра " & Кафедра & "!", _ vbInformation, "Сообщение"

ЗАМЕЧАНИЕ. При инициализации формы всегда сортируйте элементы списков!

Элемент управления Флажок создается кнопкой CheckBox (рис. 12.16) и позволяет пользователю выбрать один или несколько параметров. Как правило, флажок находится в одном из двух состояний – установлен или сброшен. Однако его можно настроить и на три положения (установлен, сброшен или не определен).

Рис.12.16. Элемент управления Флажок

Основным событием, связанным с флажком, является событие Click.

Рассмотрим важнейшие свойства CheckBox

Свойство	Описание
Caption	Текст, отображаемый рядом с флажком.
TripleState	Если его значение равно True, для флажка возможны три положения (True, False и Null – установлен, сброшен, нейтрален), в противном случае – только два (True, False – установлен или сброшен). По умолчанию установлено значение False.
Value	Задает или возвращает состояние флажка: True означает, что флажок установлен, False – сброшен и Null – положение не определено.

Ниже приведен код, инициализирующий форму, представленную на рис. 12.17. (элементы управления формы имеют следующие имена: кнопка ОК – cmdOK, кнопка Отмена – cmdОтмена, флажок Осенний семестр – chkОсень, флажок Весенний семестр – chkВесна).