Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти і науки України
Національний університет «Львівська політехніка»
Кафедра САПР
ЗВІТ
про виконання лабораторної роботи №10
на тему: «Модулі в базах даних»
з курсу: «Організація баз даних і знань»
Тема роботи
Модулі в базах даних.
Мета роботи
Навчитися розробляти та використовувати модулі в базах даних.
Лабораторне завдання
Створити 2 модулі для бази даних «Картина галерея», а саме:
Модуль для вибірки за введеним прізвище художника. При виборі відкриється форма ,,Художник1,, , де можна переглянути отриманий результат.
Модуль для виведення таблиць "Назва" та "Жанр" у режимі читання та двох форм "головна" і "Картини"
Короткі теоретичні відомості
Хід роботи
1) Модуль для вибірки за введеним прізвище художника ім’ям клієнта. При виборі відкриється форма ,, Художник1,, , де можна переглянути отриманий результат.
Option Compare Database
Public Function Poshuk()
Dim strCriteria, strInput, strMsg As String
strMsg = "Введіть прізвище художника: "
strInput = InputBox(strMsg)
strCriteria = BuildCriteria("Прізвище", dbText, strInput)
DoCmd.OpenForm "Художник1", aсNormal, , strCriteria
Exit_Poshuk: Exit Function
End Function
Результат виконання:
Модуль для виведення таблиць "Назва", "Жанр" та «Меню» у режимі читання та двох форм "Картини", і «Головна»
Option Compare Database
Public Function VidkrytiaTablyci()
DoCmd.OpenTable "Назва", acViewNormal, acReadOnly
DoCmd.OpenTable "Жанр", acViewNormal, acReadOnly
DoCmd.OpenForm "головна", acViewNormal, acReadOnly
DoCmd.OpenForm "Картини", acViewNormal, acReadOnly
End FunctionРезультат виконання:
Висновки
На цій лабораторній роботі я навчився створювати та використовувати модулі у базах даних.