Лабораторная работа №4
Тема: Создание простых VB-приложений. Организация выбора параметров и опций. Создание exe файлов.
Цель работы: Изучить:
· свойства, методы и события управляющих элементов CheckBox и OptionButton;
· использование группы переключателей;
· создание exe файлов.
Отчет: файлы проекта с выполненными заданиями.
Оглавление
Элемент CheckBox. 1
Задание №1. 2
Элемент RadioButton. 3
Задание №2. 4
Создание откомпилированных исполняемых exe файлов. 5
Задание №3. 5
Элемент CheckBox
Используется в тех случаях, когда надо дать пользователю возможность выбора типа True/False или Yes/No. Щелчок на элементе приводит к его выбору, повторный щелчок – к отмене выбора. Можно выбрать один или несколько флажков.
Свойства
Если флажок выбран, его свойство Checked принимает значение True в противном случае — False.
Определить текущее состояние флажка позволяет свойство CheckState, которое может принимать три значения: Checked (выбран), Unchecked (не выбран), Indeterminate.
Свойство Checked позволяет только проверить состояние флажка (свойство для чтения), а свойство CheckState позволяет и проверить и изменить состояние флажка.
If CheckBox1. CheckState = CheckState. Checked Then
MsgBox("Флажок выбран, переключаем.")
CheckBox1. CheckState = CheckState. Unchecked
End If
Свойство Text позволяет дать элементу необходимую текстовую надпись, например: CheckBox1 .Text ="Auto ListMembers".
Чтобы сделать флажок недоступным, надо сделать его свойство Enabled равным False.
CheckBoxBold. Enabled =False
Основное событие CheckedChanged наступает при изменении состояния флажка.
Задание №1
¨ 
Создать новый проект с формой, содержащей следующие элементы:
¨ Многострочное текстовое поле, содержащее форматируемый текст.
¨ 3 элемента CheckBox, позволяющих задать написание текста. Выбор первого флажка делает текст полужирным, второго — курсивом, а третьего— подчеркнутым.
¨ элемент CheckBox, выбор которого разрешает изменение шрифта, в противном случае изменение шрифта запрещено.
Изменение стиля текста
Текстовое поле имеет свойство Font, параметры которого TextBox1.Font.Bold, TextBox1.Font.Italic и TextBox1.Font.Underline нельзя изменять программно. Можно только узнать их значение (True или False).
If TextBox1.Font. Bold =True Then ' можно проверить
TextBox1.Font. Bold =False ' нельзя изменить! Ошибка!
End If
Для изменения стиля надо менять все свойство Font.
TextBox1.Font = New Font(TextBox1.Font.Name, _
TextBox1.Font.Size, FontStyle.Bold)
Первые три параметра конструктора определяют наименование, размер и стиль шрифта. Стиль задается константами, членами перечисления FontStyle:
FontStyle.Bold - жирный,
FontStyle.Italic - курсив,
FontStyle.Underline – подчеркнутый,
FontStyle.Strikeout – зачеркнутый,
FontStyle.Regular – обычный.
Эти константы устанавливают определенные биты свойства TextBox1.Font.Style. Поэтому, если надо сделать шрифт – жирный курсив, то свойство Style должно определяться следующим образом:
FontStyle.Bold Or FontStyle.Italic
Операции And, Or и Xor в зависимости от операндов являются логическими или побитовыми операциями.
В задании надо при выборе определенного флажка изменять только одно свойство начертания (только bold или только italic) и не трогать остальные. Такие операции называются "маскированием". Чтобы изменить свойство bold на противоположное, надо выполнить следующий код
TextBox1.Font = New Font(TextBox1.Font.Name, _ TextBox1.Font.Size, _
TextBox1.Font.Style Xor FontStyle.Bold)
Если состояние флажка заранее согласовано со шрифтом текстового поля (для обычного начертания флажок не выбран), то это и весь обработчик события изменения состояния флажка. Для подстраховки можно записать следующий код (изменяется шрифт текстового поля TextBox1)
Private Sub CheckBold_CheckedChanged(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles CheckBold.CheckedChanged
If TextBox1.Font.Bold= True Then 'обнуляем соотв. биты
TextBox1.Font = New Font(TextBox1.Font.Name, TextBox1.Font.Size, _
TextBox1.Font.Style And Not (FontStyle.Bold))
Else 'копируем соотв. биты
TextBox1.Font = New Font(TextBox1.Font.Name, TextBox1.Font.Size, _
TextBox1.Font.Style Or FontStyle.Bold)
End If
End Sub
Проанализируйте и объясните работу обработчика.
Элемент RadioButton
Используется в основном в группе переключателей опций, из которых можно выбрать только одну, в то время как флажков можно выбрать несколько.
Свойства
Свойство Checked указывает, выбран элемент или нет. Если RadioButton (переключатель) выбран, его свойство Checked равно True, если переключатель не выбран — False. Это свойство можно программно как читать, так и изменять.
Свойства Text и Enabled используются так же, как и для элемента CheckBox.
Основное событие CheckedChanged наступает при изменении состояния.