Практическая работа. Работа с формами в среде СУБД MS Access

ГОСУДАРСТВЕННОЕ БЮДЖЕТНОЕ ОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ

ЛУГАНСКОЙ НАРОДНОЙ РЕСПУБЛИКИ

"КИРОВСКАЯ СРЕДНЯЯ ОБЩЕОБРАЗОВАТЕЛЬНАЯ ШКОЛА №3"

Практическая работа

урока информатики

Тема: “Работа с формами в среде СУБД Access”

Составитель: учитель информатики II категории

Петров Денис Сергеевич

2017 г.

Цель: закрепить теоретический материал и приобрести практические навыки создания форм для ввода информации в базы данных в среде СУБД Ассеss.

Задание:

1. Создать форму по образцу.

2. Отредактировать форму по образцу.

3. Добавить в форму два вычисляемых поля.

4. Добавить в форму рисунок.

5. Используя созданную форму отредактировать 2-3 записи таблицы и ввести новые 3 записи в таблицу.

6. Создать еще 1-3 формы на основании одной таблицы.

7. Создать формы на основании 2-3 таблиц.

8. Создать формы на основании запросов.

9. Добавить в формы вычисляемые поля в режиме Конструктор.

10. Добавить в формы элементы управления в режиме Конструктор.

11. Продемонстрировать созданные формы преподавателю.

12. Закрыть все окна базы данных и MS Access. Открыть личную папку, в которую была записана созданная база данных, и убедиться в том, что база данных записана в нужную папку

Вариант создаваемых форм БД “Магазины”

Таблица “Владелец” в режиме “Конструктор”

Исходные данные таблицы “Владелец”

Таблица “Склады” в режиме “Конструктор”

Исходные данные таблицы “Склады”

Таблица “Магазины” в режиме “Конструктор”

Исходные данные таблицы “Магазины”

Связь таблиц Владелец - Склады - Магазины

Три формы, основанные на одной таблице в режиме “Конструктор”

Три формы, основанные на одной таблице

Форма, созданная на основе двух таблиц с добавлением трех вычисляемых полей и трех управляемых кнопок в режиме “Конструктор”

Форма, созданная на основе двух таблиц с добавлением трех вычисляемых полей и трех управляемых кнопок

С помощью построителя выражений составляем условия

для вычисляемых полей

Код кнопки “Закрыть”

Private Sub Выключатель37_Click()

DoCmd.Close

End Sub

Код кнопки “Склады”

Private Sub Выключатель 42_Click()

On Error GoTo Err_ Выключатель 42_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "Склады"

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_ Выключатель 42_Click:

Exit Sub

Err_ Выключатель 42_Click:

MsgBox Err.Description

Resume Exit_ Выключатель 42_Click

End Sub

Код кнопки “Склады”

Private Sub Выключатель 43_Click()

On Error GoTo Err_ Выключатель 43_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = " ВладелецМагазиныСклады "

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_ Выключатель 43_Click:

Exit Sub

Err_ Выключатель 43_Click:

MsgBox Err.Description

Resume Exit_ Выключатель 43_Click

End Sub

Две формы, основанные на запросах в режиме “Конструктор”

Две формы, основанные на запросах

9