Лабораторная работа № 6 Создание макросов в среде msAccess.

Цель: Вы научитесь:

.

• создавать сложные формы и отчёты;

• заполнять таблицу данными, используя форму.

Для достижения цели перед студентами ставятся и решаются следующие задачи:

1. Знакомство с интерфейсом MicrosoftAccess;

2. Создание БД с помощью мастера;

3. Занесение информации в таблицу БД;

4. Добавление и редактирование записей;

5. Внесение изменений в структуру таблицы;

6. Создание форм с помощью мастера;

7. Занесение информации в таблицу БД с помощью формы;

8. Добавление и редактирование записей.

Содержание отчета

1. Название и цель выполнения работы.

2. Выполнить подготовительную часть.

3. Условие задачи. Структуру записи.Заполненную таблицу.

4. Форма (одна страница).

5. Краткое описание действий по выполнению практической части.

6. Письменные ответы на заданные вопросы.

Подготовительная часть

1. Дать характеристику следующим понятиям

• Кнопочная форма, ее создание.

2. Выполнить практическую работу № 32 (стр. 217 - 221) из книги «Практикум з інформатики» Я.М.Глинський. Результаты работы предоставить преподавателю.

Практическая часть

Задание №1. Создание базы данных.

1. Создайте новую базу данныхТовар.

2. Создайте таблицу базы данных.

3. Определите поля таблицы в соответствии с табл. 1.

4. Сохраните созданную таблицу.

5. Заполните таблицу.

Таблица. 1. Таблица данных Преподаватели

Имя поля	Тип данных	Свойства поля
Код товара	Счетчик	Индексированное поле (совпадения не допускаются)
Наименование товара	Текстовый	Размер поля (25)
Количество	Числовой	Байт
Цена	Денежный
Код поставщика	Мастер подстановки
Статус	Текстовый	Размер поля (25)

Добавить поле дата пересдачи – макрос определяет сколько дней осталось можно привязать к кнопке

Макрос данных после изменения оценки - меняет статус студента

• Итого начислено - это сумма значений Оклада, Отпускных и Премия;

• Пенсионный фонд - это 0,5% от значения Итого начислено, если начислено до 525 грн. включительно, или 2%, если начислено больше 525 грн. и меньше 7875 грн. включительно, или 149,63 грн. если начислено больше 7875 грн.;

• Фонд безработицы - это 0,5 % от значения Итого начислено (без учета больничного листа), если начислено меньше 7875 грн. включительно, или 39,38 грн. если начислено больше 7875 грн.;

• Соцстрах - это 0,5% от значения Итого начислено (без учета больничного листа), если начислено до 525 грн. включительно, или 1%, если начислено больше 525 грн. и меньше 7875 грн. включительно, или 78,75 грн. если начислено больше 7875 грн.;

• Подоходный налог - это 15% от разности Итого начислено, Фонда безработицы, Пенсионного фонда, Соцстраха и 200 грн., если начислено до 740 грн. включительно, или 15% от разности Итого начислено, Фонда безработицы, Пенсионного фонда и Соцстраха, если начислено больше 740 грн;

• Итого удержано - это сумма значений Аванса, Фонда безработицы, Пенсионного фонда, Соцстраха, Подоходного налога и Прочих.

• Всего к оплате - это разность значений Итого начислено и Итого удержано, если эта разность величина не отрицательная.

Добавить в таблицу преподаватели поле Налог, который рассчитывает отчисления в фонд безработицы по следующему правилу:0,5 % от значения Зарплата, если начислено меньше 7875 грн. включительно, или 39,38 грн. если начислено больше 7875 грн. Для заполнения этого поля использовать вычисляемое поле в таблице.

Разработать макрос данных, который пересчитывает значение поля Налог при изменении зарплаты.

• Открыть таблицу Преподаватели в режиме Таблица;

• В режиме таблицы откройте в разделе Работа с таблицами вкладку Таблица и нажмите кнопку событияДо изменения;

• Далее необходимо создать оператор Если...То...Иначе, который будет срабатывать при каждом внесении изменений в таблицу. На вкладке Преподаватели: до изменения щелкните раскрывающийся список и выберите операторЕсли. Чтобы добавить в операторЕсли условие, введите после оператора ЕслиUpdated("Зарплата")=Истина.

• Заполнение поля Налог происходит поразному. Поэтому нам понадобится проверить еще одно условие. Щелкните операторЕсли еще раз и обратите внимание, что правом нижнем углу блока появились команды Добавить Иначе и Добавить Иначе если. Щелкните командуДобавить Иначе если, чтобы добавить соответствующий блок. В поле условия введите [Зарплата]<=7875. Перетащите из каталога макрокоманд макрокоманду ЗадатьПоле в блокИначеесли. В поле Имя введите Налог, а в поле Значение — [Зарплата]*0,005.

• Щелкните операторИначееслии выберите команду Добавить Иначе. Перетащите макрокоманду ЗадатьПолев блокИначе. В поле Имя введите Налог, а в поле Значение — 39,38. Теперь макрос должен быть подобен приведенному на рисунке.

• Сохраните и закройте макрос, щелкнув вкладку Преподаватели: до изменения правой кнопкой мыши и выбрав командуЗакрыть.

• Чтобы протестировать макрос, переключитесь в режим таблицы, измените значение поля Зарплата, щелкните за пределами измененной записи и вы увидите, что число в поле Налог изменится.