48521 (Разработка автоматизированной системы "Библиотека"), страница 3
Описание файла
Документ из архива "Разработка автоматизированной системы "Библиотека"", который расположен в категории "". Всё это находится в предмете "информатика" из 1 семестр, которые можно найти в файловом архиве . Не смотря на прямую связь этого архива с , его также можно найти и в других разделах. Архив можно найти в разделе "курсовые/домашние работы", в предмете "информатика, программирование" в общих файлах.
Онлайн просмотр документа "48521"
Текст 3 страницы из документа "48521"
Адреса_клиентов.Кнопки – макрос по выбору читателей по заданной первой букве фамилии.
Сумма_оплаченная – переход к выбранному читателю из возможных
Поиск_книги.Фильтр – применение фильтра на основании заданных параметров.
Поиск_книги.Ошибка – выдается сообщение, если читатель пытается взять книгу, которая на руках у другого человека.
Поиск_книги.Взять – вспомогательный макрос для поиска книги.
Поиск_книги.Взял – закрывает форму Поиск_книги и записывает выбранную книгу за читателем.
Поиск_книги.Error – выдает сообщение, если при поиске книги по критериям читатель указал более или менее пяти критериев.
8.2 Реализация алгоритмов средствами Visual Basic
Следующий алгоритм предназначен для перехода на форму Адреса_клиентов после нажатия кнопки Просмотр всех читателей на главной форме:
Private Sub ВсеЧитатели_Click()
On Error GoTo Err_ВсеЧитатели_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = ChrW(1040) & ChrW(1076) & ChrW(1088) & ChrW(1077) & ChrW(1089) & ChrW(1072) & ChrW(95) & ChrW(1082) & ChrW(1083) & ChrW(1080) & ChrW(1077) & ChrW(1085) & ChrW(1090) & ChrW(1086) & ChrW(1074)
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_ВсеЧитатели_Click:
Exit Sub
Err_ВсеЧитатели_Click:
MsgBox Err.Description
Resume Exit_ВсеЧитатели_Click
End Sub
Кроме того, в автоматизированной системе “Библиотека” присутствуют и другие события, написанные средствами Visual Basic:
Событие, позволяющее подсчитать пеню читателя.
Событие, предназначенное для открытия формы Поиск_книги после нажатия кнопки Поиск_книги.
Событие, которое происходит после выбора читателем пяти критериев при поиске книги. Оно позволяет вывести на экран только те критерии, которые выбрал пользователь и после производить действия с ними.
Событие, которое происходит при нажатии читателем при выборе понравившейся ему книги.
Событие, которое скрывает все поля для ввода критериев при запуске формы Поиск_книги или повторном поиске книги.
9. Разработка приложения пользователя
Главной формой базы данных “Библиотека” является Главная форма, содержащая в себе 6 вкладок.
Вкладка Сведения о книгах.
На данной вкладке представлена информация обо всех тех книгах, которые брал тот читатель, чья фамилия выбрана в заголовке формы.
Вкладка Просроченные книги содержит информацию о просроченных книгах и о той сумме, которую следует заплатить (поле Пеня). При двойном нажатии на данное поле происходит переход на вкладку Оплатить долг.
Курсор автоматически устанавливается в последнее поле, счетчик увеличивается на единицу, датой оплаты ставится текущее число, а вверху формы автоматически проставляется текущая сумма задолженности. После того, как пользователь введет сумму, которую он хочет оплатить, ему следует нажать кнопку Рассчитать.
Вкладка Какие книги на руках отвечает за информацию о тех книгах, которые находятся на руках у читателя (если таковые имеются).
Вкладка Сведения о читателе содержит информацию о выбранном читателе. При нажатии кнопки Просмотр всех читателей открывается форма Адреса_клиентов, в которой представлена информация обо всех читателях с их адресами и телефонами.
И последняя вкладка, Найти и взять книгу, содержит данные о тех книгах, которые читатель брал. При нажатии на кнопку Поиск книги откроется форма Поиск_книги, на которой читатель может найти книгу по заданным параметрам и взять ее.
Приложения
1. Формы
2. Отчеты