Переключатели OptionButton
Практическая работа 1
Создание базы данных в MS Excel
Цель работы: Средствами VBA создать интерфейс пользователя, позволяющий обрабатывать табличные данные.
Содержание работы:
Часть 1 Разработка интерфейса пользователя. 2
Создание главной кнопочной формы.. 2
Создание формы Регистрация. 4
Создание формы Поиск и редактирование. 7
Часть 2. Разработка программного кода. 12
Создание стандартного модуля проекта. 12
Создание процедур модуля формы Otel 14
Создание процедур модуля формы Registration. 16
Создание процедур модуля формы Find_Edit 20
Часть 1 Разработка интерфейса пользователя
Создайте на рабочем листе “База данных” следующую таблицу. Главное заполнить первую строку – строку заголовка.
Создать на рабочем листе кнопку , открывающую главную кнопочную форму.
Создание главной кнопочной формы
В редакторе кода создать UserForm. Присвоить свойствам формы следующие значения:
Name – Otel.
Caption - Гостиница
Вид формы в редактора кода
Создать кнопки, вызывающие процедуры обработки события Click, выполняющие следующие действия:
1. Кнопка Регистрация клиентов открывает форму Registration в режимы добавления записей.
‒ Name – cmdRegistration
‒ Caption - Регистрация клиентов
2. Кнопка Просмотр данных открывает форму Registration в режимы чтения данных. Изменять значения нельзя.
‒ Name – cmdShow
‒ Caption - Просмотр данных
3. Кнопка Поиск и редактирование данныхоткрывает форму Find_edit, в окне которой задаются критерии поиска.
‒ Name – cmdFind_Edit
‒ Caption - Поиск и редактирование данных
4. Кнопка Выход из Excel завершает работу с базой и закрывает MS Excel.
‒ Name - cmdExit
‒ Caption - Выход из Excel
5. Кнопка Конец работы закрывает главную кнопочную форму. Рабочий файл остаётся открытым.
‒ Name – cmdEnd
‒ Caption - Конец работы
Создание формы Регистрация
В редакторе кода создать UserForm. Созданная форма используется для регистрации клиента, просмотра данных и отображения результата поиска для редактирования или удаления записи. Присвоить свойствам формы следующие значения:
Name – Registration
Caption – Регистрация клиента
Вид формы в режиме регистрации
Вид формы в режиме просмотра записей
Вид формы в режиме редактирования или удаления записи
Вид формы в редакторе кода
Создать объекты Controls:
Надписи
1.1. Lable - lblRegistration:
Свойство Name = lblRegistration
Свойство Caption = Введите данные о клиенте и нажмите ОК
Lable - lblEdit_Del
Свойство Name = lblEdit_Del
Свойство Caption =
Свойство WordWrap = True
1.3. Lable Фамилия, Имя, Номер, Продолжительность проживания(сутки), № записи. Имена кнопок могут быть любые, так как в процедурах к ним нет обращения.
2. Текстовые поля TextBox
2.1. TextBox - txtFamпредназначено для ввода или отображения фамилии. Свойство Name = txtFam
2.2. TextBox – txtNameпредназначено для ввода или отображения имени. Свойство Name = txtName
2.3. TextBox – txtSrok – предназначено для ввода или отображения продолжительности проживания. Свойство Name = txtSrok
2.4. TextBox – TxtNumber -предназначено для отображения номера текущей записи. Свойство Name =TxtNumber
Флажки CheckBox
3.1. CheckBox – chkOplata- установлен, если номер оплачен. Свойство Name =chkOplata
3.2. CheckBox – chkPasport –установлен, если паспорт сдан. Свойство Name =chkPasport
Рамка Frame
4.1. Frame – Оплата/Документ.Имя любое. Caption = Оплата/Документ.
4.2. Frame – Пол.Имя любое. Caption = Пол.
Переключатели OptionButton
5.1. OptionButton – optMan. Свойство Name = optMan, Caption = Муж
5.2. OptionButton – optWomen. Свойство Name = optWomen, Caption = Жен