- •Введение
- •1. Разработка базы данных для учета……(продолжение согласно теме)
- •1.1. Назначение проектируемой базы данных
- •1.2. Требования к проектируемой базе данных
- •1.3. Разработка инфологической модели базы данных
- •Поставщик
- •1.4. Обоснование выбора программных средств для реализации разработанной базы данных
- •2. Разработка приложения для работы с базой данных
- •2.1. Разработка физической модели базы данных
- •2.2. Разработка экранных форм и программного кода
- •2.3. Разработка запросов к базе данных
- •2.4. Разработка отчетов (если все элементы бд создаются в ms access)
- •Заключение
- •Список использованных источников
2.2. Разработка экранных форм и программного кода
Для повышения удобства работы с таблицами созданной базы данных были разработаны 6 экранных форм. Первая экранная форма (рис.2.3) предназначена для выбора режима работы с базой данных – ввода новых данных или поиск и отбор необходимых сведений.
Рис.2.3. Стартовая экранная форма
Для ввода данных в каждую таблицу были созданы 5 цветных экранных форм, представленные на рис.2.4.
……………
Рис.2.4. Экранные формы для ввода новых данных в таблицы базы
Для автоматизации ввода данных некоторые параметры вводятся путем выбора из ниспадающих списков (например, название фирмы, номер офиса, вид документа). Это исключает ошибки при вводе данных состоящих из нескольких слов или на иностранном языке.
Для создания ниспадающих списков использованы таблицы, содержание перечень значений, доступных для выбора.
На каждой форме предусмотрены кнопки, позволяющие записать введенные данные в базу и закрыть форму.
Для снижения количества ошибок при вводе данных в базу предусмотрен контроль за полнотой ввода данных с помощью следующего программного кода:
Private Sub Кнопка40_Click()
On Error GoTo Err_Кнопка40_Click
If IsNull(Время_въезда) Then
strMessage = "Вы не вели время въезда автомобиля. Повторите ввод времени"
intOptions = vbQuestion + vbOKCancel
bytChoice = MsgBox(strMessage, intOptions)
If bytChoice = vbOK Then Время_въезда.SetFocus Else: DoCmd.Close
Cancel = True
End If
End If
Exit_Кнопка40_Click:
Exit Sub
Работа процедуры контроля за полнотой ввода данных представлена на рис.2.5.
Рис.2.5. Контроль за полнотой ввода данных в базу
2.3. Разработка запросов к базе данных
При работе с базой данных сотрудникам компании требуется отбирать данные, удовлетворяющие определенным требованиям. Проще всего процедуру отбора определенных данных из базы реализовать с помощью запросов.
В среде СУБД “Access” для создания запросов используется визуальный конструктор, позволяющий выбрать таблицы, содержащие необходимые данные, конкретные поля и указать условия отбора, либо сформировать дополнительные окна, с помощью которых можно выполнить запросы с параметром.
Руководителю для анализа работы предприятия необходимы данные из базы:
- о количестве товаров различных типов, имеющихся на складе;
- о количестве товаров различных типов, проданных за день или неделю (месяц);
- о количестве товаров различных поставщиков, проданных за день или неделю (месяц);
- о выручке, полученной за каждый день (неделю или месяц);
- работе менеджеров компании.
На рис. 2.6 представлена структура 5-ти запросов, позволяющих получить вышеперечисленные данные:
………..
Рис. 2.6 Структура запросов
При выполнении перового запроса по отбору данных о поставках определенного поставщика запрашивается его наименование (рис.2.7).
В результате выполнения запроса на экран выводится следующий список данных:
Рис.2.8. Результат выполнения первого запроса
Аналогично представляется работа остальных 4-х запросов.
