3123

тор и щелкните мышью в одном из полей первой строки (или выделите ее целиком), вызовите контекстное меню — Добавить строки. В вставленной пустой строке в поле Макрокоманда поместите команду Свернуть. Сохраните и запустите макрос.

Создайте макрос Открыть форму Договоры. Проверьте его. Закройте все окна, кроме окна БД.

Создание группы макросов

Создайте группу макросов с общим именем Группа. Включите в эту группу следующие макросы (рис.7.3):

Рис. 7.3. Конструктор группы макросов

81

•подача сигнала — макрокоманда Сигнал;

•открытие таблиц (Открыть таблицу) Договоры, Клиенты, Страны, Сотрудники;

•размещение открытых таблиц на экране в виде горизонтальной мозаики (Выполнить команду — Рядом Вертикально);

•закрытие всех таблиц (Закрыть);

•выход из Ассеss (Выход).

Проверьте работу каждого из макросов созданной группы.

Связывание макроса с событием

1. Для создания макроса Autoexec:

• создайте макрос Открытие формы Договоры; 2. Создайте новую форму, включив в нее заголовок

«Вас приветствует база данных Туризм», какую-либо картинку и кнопку «Открыть форму Договоры»;

•назначьте для этой кнопки макрос «Открыть форму Договоры» (контекстное меню на кнопке — Свойства — вкладка События — Нажатие кнопки — имя макроса). Закройте созданную форму и дайте ей название Заставка;

3. Создайте новый макрос с именем Аutоехес, состоящий из следующих макрокоманд:

•ВыполнитьКоманду — Окно Закрыть;

•Открыть Форму;

•Развернуть.

Выполните макрос Завершение.

Загрузите БД Туризм. Проверьте работу макросов Autoexec и Открыть форму Договоры.

Закройте БД. Запустите ее вновь с нажатой клавишей SН1FТ. При этом макрос Autoexec не выполняется.

82

Рис. 7.4. Форма "заставка"

Создайте и выполните макрос «Поиск договора». Для

этого:

•откройте новое окно макроса и перетащите форму Договоры в первую строку;

•во второй строке выберите макрокоманду К элементу Управления. Для аргумента «Имя элемента» установите значение Код клиента. Так задается поле, среди значений которого будет осуществляться поиск;

•в следующей строке макроса выберите макрокоманду НайтиЗапись. Для аргумента «Образец поиска» задайте любой код клиента. Остальные аргументы оставьте без изменения.

•сохраните макрос под именем «Поиск договора» и запустите его. В результате программа откроет форму, выполнит поиск и пометит найденное значение. Если заданное значение не будет найдено, то маркированным останется первый элемент (первая запись) формы.

Связывание макроса с кнопкой

Создайте три макроса для открытия форм Клиенты, Сотрудники, Страны.

83

Откройте форму Договоры и создайте в ней несколько кнопок для открытия всех форм БД. Каждую кнопку снабдите понятным названием или изображением.

Свяжите каждую кнопку с соответствующим макро-

сом.

Проверьте все кнопки.

Создайте кнопку на форме Договоры с изображением самолета. Свяжите ее с макросом Завершение. Снабдите кнопку всплывающей подсказкой «Завершение работы».

Выполнение макроса с условиями

Создайте макрос, который каждый раз после ввода в

форму Договоры сведений о новом групповом договоре должен выводить на экран сообщение о том, что клиент является групповым. Порядок выполнения задания:

1. Создайте новый макрос и присвойте ему имя Групповой клиент:

•если столбец Условие не отображается на экране, щелкните на кнопке Условие на панели инструментов или выполните команду Вид →Условие;

•в первую ячейку столбца условий введите с помощью команды Построить логическое выражение [Forms]![Договор]![ Число туристов]>1;

•в той же строке, но в столбце Макрокоманда выберите макрокоманду Сообщение и задайте значение «Групповой клиент» для аргумента «Сообщение». Именно эта фраза отобразится на экране в окне сообщения при выполнении заданного условия. Для аргумента «Тип» установите значение «Информационное». При этом в окне сообщения, кроме текста, появится значок с изображением литеры «i» (стандартный вариант в Windows при выдаче сообщений), в поле Заголовок введите — «Внимание!»;

•сохраните созданный макрос с именем Групповой

клиент.

84

2. Свяжите макрос с формой Договоры:

• откройте форму Договоры в режиме Конструктора;

Рис. 7.5. Форма "Договоры" в режиме "Конструктор"

•откройте окно свойств формы, выполнив двойной щелчок в указанной на рисунке области;

•найдите на вкладке События поле После обновления

ивыберите в списке макрос Групповой клиент;

•закройте окно свойств формы и перейдите в режим заполнения;

•перейдите к новой записи и заполните ее (в поле Число туристов введите любое число больше 1.

СООБЩЕНИЕ ПОЯВИТСЯ ТОЛЬКО ПОСЛЕ ЗАВЕРШЕНИЯ РАБОТЫ С ЗАПИСЬЮ.

3. Закройте форму Договоры. Комбинации клавиш для запуска макросов

Назначьте для открытия таблицы Договоры — СТRL + нуль, для открытия формы Сотрудники — СТRL+F1.

Сохраните файл.

85

Создание на основе макросов меню, контекстных меню и панелей инструментов

На основе группы макросов Группа создайте меню, панель инструментов и контекстное меню.

Свяжите появление меню (контекстного меню или панели инструментов) с активизацией формы Договоры («Строка меню» («Панель инструментов», «Контекстные меню» в Свойствах) — Группа).

Рис. 7.6. Свойства формы "Договоры"

Откройте форму Договоры и проверьте все кнопки из группы макросов.

Сохраните файл. Сдайте работу преподавателю.

КОНТРОЛЬНЫЕ ВОПРОСЫ

1.Понятие отчет и чем отличается от формы?

2.Способы создания отчетов и их особенности.

3.Для чего нужны макросы?

86

ЛАБОРАТОРНАЯ РАБОТА 8 Тема Проектирование базы данных «Кинотеатр»

Цель. Умение проектировать базы данных и работать с

ними.

Задание 1. Создайте новую базу данных КИНОТЕ-

АТР.

1. Вызовите программу Microsoft Access 2010; перед вами откроется окно СУБД, в правой части которого находится меню (

После создания пустой базы данных необходимо создать объекты этой базы данных.

Задание 2. Создание таблицы Кинотеатры

1.При создании новой базы данных MS Access сразу предлагает работу в режиме Таблицы.

2.Правой кнопкой мыши выделите Таблицу1 и выберете режим Конструктор

1.Появится окно Конструктора. В первой строке введите имя поля – Код. В соседней клетке появится тип данных (по умолчанию Текстовый). В ниспадающего меню выберите тип Счетчик. Перейдите в бланк Свойства поля в нижней части окна и задайте значение Размер поля: Длинное целое. Действуя аналогично, задайте названия, укажите тип и свойства данных для остальных полей.

87

Поле Код одновременно является и ключевым. Ключевые поля нужны для связывания таблиц и для идентификации записей в таблице. Чтобы сделать поле ключевым, надо выделить соответствующую строку и на панели выбрать пикто-

грамму (Ключ).

Закройте и сохраните таблицу под именем КИНОТЕ-

АТРЫ.

Задание 3. Откройте таблицу КИНОТЕАТРЫ в Режиме таблицы и заполните ее данными (! поле Код заполняется автоматически).

Для заполнения таблицы данными откройте ее в режиме Таблицы. Если таблица была закрыта, то в меню Объекты дважды щелкните по названию таблицы. Если таблица не была закрыта, то на панели выберите Режим таблицы. При необходимости сохраните таблицу.

Измените ширину столбцов, чтобы заголовки полей читались целиком.

Введите данные:

Закройте и сохраните таблицу.

Задание 4. Создайте в Режиме конструктора таблицу ЗАЛЫ.

88

Создайте таблицу в Режиме конструктора. Определите поля Наименование зала, Вместимость,

Работает согласно заданию.

Создайте поле с подстановкой Кинотеатр. Для этого:

в столбце Имя поля наберите Кинотеатр, а в столбце Тип данных выберите Мастер подстановок;

в появившемся окне Создание подстановки выберите Объект «столбец подстановки» будет использовать значения из таблицы или запроса и щелкните по кнопке Далее;

в окне выберите таблицу, используемую для подстановки КИНОТЕАТРЫ - и щелкните по кнопке Далее;

выберите поля, которые будут отображаться в таблице ЗАЛЫ (например, только название) и щелкните по кноп-

ке Далее;

в окне Задайте подпись, которую содержит столбец подстановки - наберите Кинотеатр;

щелкните по кнопке Готово.

Сохраните и закройте таблицу.

89

Задание 5. Создайте в Режиме конструктора таблицу

ФИЛЬМЫ

Создайте таблицу в Режиме конструктора.

Определите поля Название фильма, Производство, Год выпуска согласно заданию.

Создайте поле с подстановкой Жанр. Для этого:

в столбце Имя поля наберите Жанр, а в столбце

Тип данных выберите Мастер подстановок;

в появившемся окне Создание подстановки выбе-

рите Будет введен фиксированный набор значений и щелк-

ните по кнопке Далее;

в следующем появившемся окне (рис. 8.1) в поле Число столбцов оставьте 1, а Столбец 1 заполните данными, располагая их построчно: Боевик Вестерн…затем щелкните по кнопке Далее;

90