![]()
|
|||
Синтаксис
Урок №105
Тема урока: Элемент управления CheckBox
1.Назначение элемента управления CheckBox Создает элемент управления CheckBox Синтаксис CheckBox Checkbox применяется в тех случаях, когда можно выбрать что-либо, поставив галочку. Очень простой элемент, обычно применяется с полями или переменными памяти логического типа. В этом случае установленная галочка соответствует значению .t. (истина), а неустановленная - значению .f. (ложь). Но возможно и применение его с числовыми переменными (или полями), в этом случае присваиваются значения 1 или 0. 2. Свойства элемента управления CheckBox BackColor - Задают цвет фона , используемые при отображении текста и графики в объекте BorderColor - Задает цвет обрамления объекта FontBold - Задают для текста стиль Bold (полужирный). FontItalic - Задают для текста стиль Italic (курсив FontUnderline - Задают для текста стиль Underline (подчеркнутый FontStrikethru - Задают для текста стиль Strikethru (перечеркнутый Height - Задает ширину объекта на экране. Width - Содержит значения ширины для данного элемента управления Name – как всегда, имя объекта Caption – определяет надпись, которая будет находится возле галочки справа. TripleState – свойство позволяет определить третье состояние флажка. Как упоминалось выше, компонент CheckBox может принимать два значения: галочка установлена (true), галочка снята (false), но можно задать и третье состояние (Null) – в этом случае объект будет серого цвета и будет недоступен. Если это свойство содержит значение false – будут поддерживаться только два состояния, если true – все три. Value – данное свойство позволяет получить состояние выбора (true, false или Null). Событие Change класса CheckBox происходит при изменении состояния флажка.
Цель задания: добавить в проект форму, на ней разместить 6 флажков, разделенных на 2 группы по 3 флажка. ·Телефон: Nokia, Samsung, Siemens ·Ноутбук: Asus, Acer, Lenovo
Размещаем в столбик флажки. Справа добавляем Label – как только мы будем ставить галочку для CheckBox, на надписи добавляется выбранное название, элемент управлении Флажок сразу будет становится недоступным после выбора (свойство Enabled примет значение False). Private Sub CheckBox1_Change() If CheckBox1.Value = True Then ListBox1.AddItem CheckBox1.Caption CheckBox1.Enabled = False End If End Sub
Private Sub CheckBox2_Change() If CheckBox2.Value = True Then ListBox1.AddItem CheckBox2.Caption CheckBox2.Enabled = False End If End Sub
Private Sub CheckBox3_Change() If CheckBox3.Value = True Then ListBox1.AddItem CheckBox3.Caption CheckBox3.Enabled = False End If End Sub и т.д.
Private Sub CommandButton1_Click() CheckBox1.Enabled = True CheckBox2.Enabled = True CheckBox3.Enabled = True CheckBox4.Enabled = True CheckBox5.Enabled = True CheckBox6.Enabled = True CheckBox7.Enabled = True CheckBox8.Enabled = True CheckBox9.Enabled = True ListBox1.Clear End Sub Процедуры от CheckBox1_Change до CheckBox12_Change носят практически один и тот же характер – идет обработка события Change. Если состояние флажка ровно true, то изменяется свойство Caption (надпись рядом с флажком).
ЗАДАНИЕ К УРОКУ № 105 Ответить на следующие вопросы и отправить ответы по электронной почте.
Урок №106 Тема урока: Установка флажка
Использование в форме флажков Для размещения в форме полей, которые могут иметь только одно из двух допустимых значений, используются объекты типа checkbox (Флажок), называемые флажками. Объекты данного типа могут использоваться в форме по одному или группами. Рассмотрим следующий пример. Таблица со списком студентов может содержать поле, указывающее, является ли данный студент хорошистом. При установке флажка значение в поле будет соответствовать 1, а при сбросе флажка — 0. Рассмотрим подробно процедуру создания флажка для редактирования поля, указывающего, фамилия какого студента выводится на форму.
Практическое задание 2. Создать таблицу, в которой будет храниться список группы. Для этого выполнить команды File – New – Table – NewFile. 3.Определить три поля типа Character, каждое длиной 20 символов: 4. Создать новую форму 5. Поместить на форму три элемента CheckBox и справа от них три элемента Label. 6. Изменить коды события Click для каждой надписи:
use students locate 1 thisform.label1.caption = students.fam close students endIf if thisform.check2.Value = 1 use students locate 2 thisform.label2.caption = students.fam close students endIf
use students locate 3 thisform.label3.caption = students.fam close students endIf ЗАДАНИЕ К УРОКУ № 106 Ответить на следующие вопросы и отправить ответы по электронной почте.
|
|||
|