Переключатели 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 = Жен