BD_labs (Базы данных. Методические указания по выполнению лабораторных работ), страница 3
Описание файла
Файл "BD_labs" внутри архива находится в папке "БД. Методические указания по выполнению лабораторных работ". Документ из архива "Базы данных. Методические указания по выполнению лабораторных работ", который расположен в категории "". Всё это находится в предмете "информационные технологии" из 2 семестр, которые можно найти в файловом архиве РТУ МИРЭА. Не смотря на прямую связь этого архива с РТУ МИРЭА, его также можно найти и в других разделах. Архив можно найти в разделе "книги и методические указания", в предмете "информационные технологии" в общих файлах.
Онлайн просмотр документа "BD_labs"
Текст 3 страницы из документа "BD_labs"
Dim i
If Список1.ListCount = 0 Then
MsgBox "Список пустой"
Exit Sub
End If
If Список1.ItemsSelected.Count = 0 Then
MsgBox "Нет выделенных строк"
Exit Sub
End If
For Each i In Список1.ItemsSelected
DoCmd.RunSQL "insert into [Рабочая]([Код заказа] , “ & _
“[Количество]) select [Код заказа],[Количество]from [Заказы]” _ & “where [Код заказа]= " & Список1.ItemData(i)
Список1.Selected(i) = False
Next
Список1.Requery
Список2.Requery
End Sub
Рис. 8. Текст процедуры для перемещения записей
ЛАБОРАТОРНАЯ РАБОТА №5
АВТОМАТИЗАЦИЯ ПОДГОТОВКИ И ПЕЧАТИ ОТЧЕТА
Постановка задачи
Разработать интерфейс для просмотра и печати отчета. Пример диалоговой формы, автоматизирующей работу с отчетом по возврату заказов на определенную дату, приведен на рис. 9. Кнопка Просмотр предназначена для вывода отчета в режиме просмотра, кнопка Печать – для печати отчета. Пользователь должен иметь возможность подтвердить печать отчета и указать количество экземпляров отчета для печати. При отсутствии данных для отчета должно быть выведено соответствующее информационное сообщение. Заголовок отчета должен содержать значения введенных параметров. Так отчет о возврате заказов на 2.05.01 должен иметь заголовок: «Отчет по возврату заказов на 2.05.01». Варианты задания приведены в табл.6.
Рис. 9. Диалоговая форма для ввода параметра отчета
Методические указания
-
Создайте запрос, который будет использоваться в качестве источника данных для отчета. В выражениях для условий отбора укажите ссылки на поля формы. Группировку записей в запрос можно не включать, так как ее можно будет выполнить при создании макета отчета с помощью мастера. Пример запроса для отчета по возврату заказов на заданную дату, приведен на рис. 10.
-
Разработайте макет отчета, указав для него в качестве источника записей имя разработанного запроса. Макет отчета можно создать с помощью мастера отчета, а затем откорректировать его в конструкторе. Укажите мастеру поля, по которым будет выполняться группировка и интервал группировки, например, по месяцам. Сформируйте в области заголовка отчета заголовок отчета, включающий значения параметров отчета. Добавьте к макету отчета примечание группы, если вариантом задания предусмотрен вывод итоговых значений по группе (команда Сортировка и группировка в меню Вид). Разместите в примечании группы итоговые поля, указав в них статистические функции. Например, для вывода количества возвращенных заказов укажите =Count([Код заказа]). В примечание отчета можно перетащить из заголовка группы выражение для вычисления месяца, если вывод месяца предусмотрен вариантом. Если в отчете надо выводить только итоговые значения по группе, то установите для области данных свойство Вывод на экран в значение «Нет » .
-
Разработайте диалоговую форму для ввода параметров отчета. Разместите в диалоговой форме три кнопки и напишите для них обработчики событий.
Обработчик события “Нажатие кнопки Просмотр”
-
Проверить наличие данных для отчета (используйте функцию Dcount)
-
Если данные для отчета отсутствуют
-
Вывести соответствующее сообщение. Пример использования функций Dcount и MsgBox для вывода информационного сообщения для отчета о возврате заказов приведен на рис.11.
-
Закончить процедуру
-
Вывести отчет в режиме просмотра
Обработчик события «Нажатие кнопки Печать » должен проверять наличие данных для отчета, выводить окно подтверждения печати, вводить количество экземпляров отчета (по умолчанию это количество должно быть равным 1) и выполнять печать отчета.
Таблица 6.
Варианты задания
| № | Содержание отчета | Параметры отчета | Выводимые поля | Дополнительные требования |
| 1 | Отчет за период о регистрации безработных | Начало и конец периода | Месяц, количество зарегистрированных за месяц безработных | Группировка по месяцам, итоговое количество за период |
| 2 | Информация о ценах на товар | Наименование товара | Цены изготовителей на товар с указанием наименований и адресов фирм изготовителей | Сортировка по наименованиям фирм, минимальная, максимальная и средняя цена товара |
| 3 | Учебные планы по дисциплинам для заданной специальности | Специальность и семестр | Наименования дисциплин, количества часов лекций, лабораторных, индивидуальных, практических занятий и отчетность | Сортировка по дисциплинам |
| 4 | Отчет за период о работе абонемента | Начало и конец периода | Месяц, количество выполненных операций сдачи/ выдачи книг в месяц | Группировка по месяцам, итоговое количество за период |
| 5 | Отчет о поступлениях товаров в филиал | Наименование филиала | Вид и количество товара с указанием поставщика | Группировка по виду товара, итоговое количество по каждому виду товара |
| 6 | Информация о выпускниках по заданной специальности | Специальность | Вуз и количество выпускников для каждого вуза | Группировка по вузам, общее количество выпускников по заданной специальности |
| 7 | Расписание экзаменов для заданной группы и заданного диапазона дат | Группа, диапазон дат | Дата, время, аудитория, преподаватель | Сортировка по датам |
| 8 | Список преподавателей по заданной дисциплине | Дисциплина | Фамилия и инициалы, кафедра, факультет | Группировка по кафедрам, общее количество преподавателей |
| 9 | Отчет о закупке товаров за период по месяцам | Начало и конец периода | Месяц, вид товара, количество, сумма по каждому виду товаров | Группировка по виду товаров, итоговое количество и сумма |
| 10 | Результаты экзаменов для заданного семестра | Семестр | Группа, дисциплина, средний балл по дисциплине для каждой группы | Группировка по группам и дисциплинам, средний балл по каждой группе |
| 11 | Отчет за период о поставке деталей | Начало и конец периода | Вид детали, наименование поставщика, количество деталей | Группировка по видам деталей, итоговое количество деталей по каждому виду деталей |
| 12 | Учебные планы факультета для заданного семестра | Вид группировки | Наименование дисциплины, группа, количества часов лекций, лабораторных, индивидуальных, практических занятий и отчетность | Группировка по группам или группировка по дисциплинам |
| 13 | Отчет о вакансиях предприятий | Наименование профессии | Наименование предприятия, суммарное количество вакансий, зарплата по профессии для каждого предприятия | Сортировка по наименованиям предприятий, общее количество вакансий и средняя зарплата по профессии |
| 14 | Отчет о зарегистрированных заказах за период по месяцам | Начало и конец периода | Месяц, количество и стоимость зарегистрированных заказов за месяц | Группировка по месяцам, общее количество и стоимость заказов за период |
| 15 | Отчет о зарегистрированных заказах за период по месяцам | Начало и конец периода | Месяц, количество зарегистрированных заказов, общая сумма оплаты за месяц | Группировка по месяцам, общее количество заказов и общая сумма оплаты за период |
Select [Дата возврата],[Код заказа]
From Заказы
Where [Дата возврата] = Forms![Отчет]! Дата
Рис. 10. Запрос для отчета по возврату заказов
If Dcount(“*”,“Заказы”,“[Дата возврата] = Forms![Отчет]! Дата”) _
=0 Then
MsgBox “Отчет не содержит данных. “ & Chr(10) _
& “Проверьте правильность даты “ , vbOKOnly + vbInformation
Рис. 11. Вывод информационного сообщения
ЛАБОРАТОРНАЯ РАБОТА №6
СОЗДАНИЕ ИНТЕРФЕЙСА ПРИЛОЖЕНИЯ
Постановка задачи.
Разработать интерфейс приложения для управления задачами: редактированием данных, поиском информации по заданным критериям, архивацией отобранных пользователем данных и печатью отчета. Интерфейс должен включать главную кнопочную форму, ленточную форму для просмотра и выбора данных, формы для ввода и изменения данных, форму для поиска информации, форму для архивации, форму для просмотра и печати отчета. Вид главной кнопочной формы для приложения «Наложенные платежи» приведен на рис. 12. Параметры запуска приложения должны обеспечивать автоматическое открытие главной формы.
Методические указания
1. Разработайте главную форму приложения. Напишите обработчики событий для кнопок формы и подписей к ним. Нажатие кнопки или подписи к ней должно скрывать главную форму и открывать форму для выполнения выбранной задачи. Нажатие кнопки Выход должно закрывать главную форму и выполнять выход из СУБД Access. Для выхода из СУБД используйте метод Quit объекта Application. Для каждой формы, которая будет вызываться из главной, в обработчике события «Закрытие формы» предусмотрите перевод главной формы в видимое состояние.
2. Установите для всех форм свойства Модальное окно и Всплывающее окно в значение «Да». Это не позволит пользователю при работе с активной формой получить доступ к другим объектам
Рис. 12. Главная кнопочная форма приложения «Наложенные платежи»
приложения. Свойство Всплывающее окно, установленное в значение «Да», обеспечивает также возможность сохранить свои размеры формам приложения, которые не должны разворачиваться до максимального размера.
3. Максимизируйте размер отчета для просмотра.
4. Установите параметры запуска приложения (Меню, Сервис, Параметры запуска):
-
Укажите заголовок приложения
-
Отмените вывод окна базы данных, набора настроек меню, контекстного меню и стандартных панелей инструментов
-
Укажите форму, которая будет открываться автоматически при запуске приложения
5. После установок параметров запуска перезагрузите приложение.
ЗАДАНИЕ №7
РАБОТА С НАБОРАМИ ЗАПИСЕЙ
Постановка задачи.
Разработать процедуру, добавляющую в таблицу новые записи, сформированные из данных других таблиц. При программировании процедуры использовать наборы записей (объекты RecordSet).
