Левый выпадающий список содержит тип клиента (“Окончил”, “Обучаемый”, “Ожидает”), а второй список посредством анализа первого списка заполняется клиентами выбранной категории


перейти к полному списку дипломных проектов

Ссылка на скачивания файла в формате .doc находится в конце странички

Левый выпадающий список содержит тип клиента (“Окончил”, “Обучаемый”, “Ожидает”), а второй список посредством анализа первого списка заполняется клиентами выбранной категории



Рисунок 23 - Рамка "Адрес"

Рамка “Остальное” – содержит два выпадающих списка: “Автомобиль” и “Инструктор”. Сперва клиент выбирает марку автомобиля, на котором желает проходить обучения. И в зависимости от выбранной им марки формируется выпадающий список “Инструктор”, из тех мастеров, которые обучают вождению на выбранной пользователем модели автомобиля.



Рисунок 24 – Рамка “Остальное”

Кнопка “Внести в базу данных!” – осуществляет запись клиента в базу. Если вся информация введена в необходимом объеме и без ошибок, то будет выдано сообщение об успешном внесении клиента в базу данных. После нажатия на кнопку “ОК”, вы будете возвращены в окно “Клиенты”.



Рисунок 25 – Сообщение об успешном внесении клиента в базу данных

В том случае, если данные введены не в полном объеме или содержат ошибки, то будет выдано сообщение об ошибке.



Рисунок 26 - Сообщение ошибочных данных

2.4.7 Форма “Формирование бланка оплаты”



Рисунок 27 - Формирование бланка оплата

В поле “Дата оплаты” – устанавливается дата, когда произведена оплата. Выпадающий список “ФИО Плательщика” – содержит клиентов со статусами “Обучаемый” и “Ожидает”, он предназначен для выбора плательщика. Поле “Сумма платежа” – предназначено для ввода суммы, которая будет переведена на счет автошколы. Кнопка “Сформировать бланк” – переводит в вас к бланку оплаты, но только в том случае, если введенная сумма отлична от 0, и дата оплаты установлена корректно. В противном случае будет выдано сообщение об ошибке.



Рисунок 28 - сообщение ошибочных данных

В том случае, если вы удачно перешли к бланку оплаты, то окно “Формирование бланка оплаты” будет скрыто, и вы сможете распечатать бланк посредством кнопки “Печать”, либо вернуться к окну “Формирование бланка оплаты” посредством кнопки “Вернуться”.

После того, как плательщик передаст деньги кассиру и распишется об оплате денег, то необходимо занести сведения об оплате клиентом в базу данных. Для этого с нужными выбранными значениями окна “Формирование бланка оплаты” нужно нажать на кнопку “Подтвердить оплату”. Тогда, вам будет отображено сообщение об успешном занесении оплаты в базу данных.



Рисунок 29 – Сообщение внесения оплаты

Кнопка “Закрыть” – возвратит вас к окну “Клиенты”.

2.4.8 Форма “Допуски”



Рисунок 30 - Окно "Допуски"

Вверху содержится выпадающий список, который включает в себя всех клиентов, которые в данный момент проходят обучение. После выбора клиента отображается информация о том сколько он оплатил, сколько откатал часов, и какие экзамены/зачеты он сдал. Для получения допуска до внутренних экзаменов, клиент должен сдать все зачеты, а именно “ПДД”, “Первая помощь”, должен пройти медицинский осмотр, оплатить полную сумму обучения, и откатать положенный минимум академических часов на автомобиле. Если все эти условия будут выполнены, то рамка “Допуск до внутренних экзаменов” станет неактивной, и активизируется рамка “Допуск до экзаменов в ГАИ”. Для того чтобы получить допуск до экзаменов в ГАИ, клиент обязан успешно сдать внутренние экзамены, а именно “ПДД”, “Автодром”, “Город”. Только после успешной сдачи этих экзаменов клиент может быть допущен до окончательного этапа “Экзамены в ГАИ”. В этом случае, рамка “Допуск до экзаменов в ГАИ” становится неактивной, а рамка “Экзамены в ГАИ” активизируется. Сюда заносится информация о результатах экзаменов в ГАИ, которые в дальнейшем влияют на статистику общего уровня сдачи/не сдачи экзаменов в ГАИ от автошколы.



Рисунок 31 - Окно "Допуски", после некоторых изменений

Кнопка “Сохранить” – сохраняет все внесенные изменения о результатах зачетов/экзаменов.

Кнопка “Выйти” – возвращает в окно “Клиенты”.

2.4.9 Форма “Информация о клиенте”



Рисунок 32 - Окно "Информация о клиенте"

Эта форма является простым инструментом для формирования отчета по клиенту. Левый выпадающий список содержит тип клиента (“Окончил”, “Обучаемый”, “Ожидает”), а второй список посредством анализа первого списка заполняется клиентами выбранной категории.

скачать бесплатно средства 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

заработать

Закачай файл и получай деньги