перейти к полному списку дипломных проектов
Ссылка на скачивания файла в формате .doc находится в конце странички
Рисунок 22 - Рамка "Паспортные данные"
Рамка “Адрес” – предназначена для ввода такой информации, как “Улица”, “Дом”, “Квартира”, “Домашний телефон”, “Сотовый телефон”
4.3 Форма “Группы”
Рисунок 9 – окно “Группа”
Здесь в двух вкладках содержатся списки клиентов. Во вкладке “Текущая группа” – содержится список клиентов, которые в данный момент проходят обучение. А во вкладке “Очередь” – содержится список клиентов, которые записаны в автошколу, однако еще не начали обучение. Если текущая группа не сформирована, то список на вкладке “Текущая группа” будет пуст.
Рисунок 10 – Список Рисунок 11 - Список "Очередь"
“Текущая группа”
Кнопка “Сформировать группу” – открывает окно формирования группы в том случае, если текущей группы не существует, в противном случае будет возвращено сообщение об ошибке.
Рисунок 12 – Сообщение об ошибке
Кнопка “Выпустить группу”, если план обучения не завершен, выдаст ошибку о невозможности расформирования группы.
Рисунок 13 –Ошибка “Программа обучения не пройдена”
Если программа обучения пройдена, то появится запрос на подтверждение о расформировании группы.
Рисунок 14 - Запрос "Расформирование группы"
Ответ “Нет” вернет в окно “Группа”, ответ “Да” также вернет в окно группа, однако текущая группа будет расформирована, а всем обучающимся присвоен статус “Окончил”.
Кнопка “Закрыть” – вернет в главное меню.
2.4.4 Форма “Формирование группы”
При активации окна формирования группы, автоматически устанавливаются значения полей “Начало обучения” и “Конец обучения”. “Начало обучения” устанавливается в соответствии с текущей системной датой, а конец обучения через 90-дневный срок от текущей даты. Выпадающий список “Учитель” содержит фамилии всех преподавателей теории.
Рисунок 15- Окно формирования группы
Для формирования группы необходимо перенести клиентов, которые будут включены в группу, из списка “Ожидающие клиенты” в список “Формируемая группа”. Перенос осуществляется посредством кнопок “==>>” и “<<==”, также стоит заметить, что при выборе значений из списка работает multiselect (множественный выбор). После завершения выбора необходимо нажать на кнопку “Сформировать”. Если список “Формируемая группа” будет пуст, то будет возвращена ошибка.
Рисунок 16 – Ошибка “Группа пуста”
Если во введенных датах будет содержаться ошибочная информация, то будет возвращена ошибка.
Рисунок 17 – Ошибка “Неверная дата”
Если вся введенная информация будет корректна, и список “Формируемая группа” не будет пуст, то при клике на кнопку “Сформировать” будет выдан запрос о подтверждении формирования группы.
Рисунок 18 - Подтверждение формирования группы
При ответе “Нет” вы будете возвращены в окно формирования группы, при ответе “Да” вы попадете в окно “Группа”, и текущая группа будет сформирована. Т.е. будут установлены сроки обучения и всем членам ныне текущей группы вместо статуса “Ожидает” будет присвоен статус “Обучаемый”.
Кнопка “Закрыть” – вернет вас в окно “Группа”.
2.4.5 Форма “Клиенты”
Рисунок 19 - Окно "Клиенты"
Кнопка “Добавить клиента” – открывает окно “Добавление клиента”, где посредством заполнения полей на форме, будет сформирована новая в базе данных о клиенте.
Кнопка “Внести оплату” – открывает окно “Формирование бланка оплата”, где можно сформировать бланк оплаты для конкретного клиента и непосредственно внести оплату за обучение.
Кнопка “Допуски” – открывает окно “Данные по учебе клиента”, где формируется вся информация, о сдаче экзаменов/зачетов клиентом.
Кнопка “Информация о клиенте” – открывает окно выбора клиента, по которому будет выведена информация.
Кнопка “Закрыть” – вернет вас в главное меню.
2.4.6 Форма “Добавление клиента”
Рисунок 20 - Окно "Добавление клиента"
Рамка “Личные данные” – предназначена для ввода такой информации, как “Фамилия”, “Имя”, “Отчество”, “Дата рождения”.
Рисунок 21 – Рамка “Личные данные”
Рамка “Паспортные данные” – предназначена для ввода такой информации, как “Кем выдан”, “Дата выдачи”, “Серия”, “Номер”.
Рисунок 22 - Рамка "Паспортные данные"
Рамка “Адрес” – предназначена для ввода такой информации, как “Улица”, “Дом”, “Квартира”, “Домашний телефон”, “Сотовый телефон”. Однако номера телефонов являются опциональными полями, то есть их необязательно заполнять, они помечены звездочкой “*”.
скачать бесплатно средства Microsoft Office Excel
Содержание дипломной работы
Благодаря этому языку появляется возможность значительно расширить набор функций в Excel, а также создавать функции, значения которых зависят от некоторых условий и событий
Кнопка “Статистика инструкторов” на главной форме – ткрывает окно позволяющее формировать отчеты о сдаче экзаменов учениками, обучающимися у конкретных мастеров
Рисунок 22 - Рамка "Паспортные данные"
Рамка “Адрес” – предназначена для ввода такой информации, как “Улица”, “Дом”, “Квартира”, “Домашний телефон”, “Сотовый телефон”
Левый выпадающий список содержит тип клиента (“Окончил”, “Обучаемый”, “Ожидает”), а второй список посредством анализа первого списка заполняется клиентами выбранной категории
3 Статистика инструкторов
Рисунок 39 - Статистика инструкторов
Отчет “Статистика инструкторов” – отображает все данные по результатам сдачи экзаменов у конкретных инструкторов
Кнопка “Печать” – открывает диалог отправления этого отчета на печать, а кнопка “Вернуться” – скрывает этот лист и возвращает на форму построения отчета
Save
Workbooks("cursed2ex
Show (0)
End Sub
Завершение работы формы:
Private Sub UserForm_Terminate()
MainForm
Activate
Sheets("База")
CurrentRegion
AddItem ListBox2
Show (0)
End Sub
5
Count
Sheets("База")
Text
Sheets("База")
Text)
End Sub
Поле “Номер”:
Private Sub ed_num_Change()
ed_num
7 Форма “Формирование бланка оплаты”
Кнопка “Закрыть”:
Private Sub bt_exit_Click()
PayForm
Count
For i = 2 To all
If Sheets("База")
Enabled = True
If cb_able
Cells(i, 17) = "Нет"
If cb_pdd
CurrentRegion
Value = True
If Sheets("База")
Count
For i = 2 To all
If Sheets("База")
Show (0)
End If
End Sub
Завершение работы формы:
Private Sub UserForm_Terminate()
ClientForm
Range("B7") = Sheets("База")
Range("C14") = Sheets("База")
Select
Selection
AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("База")
Rows
Text Else y = "Любой"
Sheets("База")
Range("D5") = gai2
Sheets("Отчет")
AddItem ("Любой")
For i = 2 To alld
cb_car
CurrentRegion
Range("B2") = cb_car