WWW.DISSERS.RU

БЕСПЛАТНАЯ ЭЛЕКТРОННАЯ БИБЛИОТЕКА

   Добро пожаловать!


Pages:     | 1 |   ...   | 5 | 6 ||

Чтобы создать процедуру обработки события в режиме конструктора, откройте окно свойств формы, отчета, раздела или нужного элемента управления. Выберите вкладку СОБЫТИЯ, нажмите на кнопку построителя для нужного события и выберите в списке элемент ПРОГРАММЫ.

При создании первой процедуры обработки события для формы или отчета автоматически создается связанный с ней модуль формы или отчета.

Для ссылки на свойство формы или отчета в тексте программы используется следующий синтаксис:

Forms![ИмяФормы].Свойство Синтаксис ссылки на элемент управления формы или отчета аналогичен:

Forms![ИмяФормы].[ЭлементУправления] Forms![ИмяФормы].[ЭлементУправления].Свойство Внутри модуля формы или отчета при ссылке на элемент управления имя формы можно не указывать, если элемент находится в этой же форме или отчете. Для ссылки на активную форму или отчет используется также ключевое слово Me (латинские буквы!). Например, Me.ПолеФирмы.Text.

Упражнение 1) Создайте функцию Tax_Sale (X), которая для заданного значения аргумента вычисляет налог с продаж так, как указано в запросе 3_7. Проверьте работу функции, создав новую версию запроса 3_7.

Далее приведен текст функции на языке VBA, который нужно поместить в стандартный модуль базы данных.

Public Function Tax_Sale(X) If X < 10000 Then Tax_Sale = 0.05 * X Else Tax_Sale = 0.1 * X End If End Function При создании собственных функций помните, что имена функций не должны содержать русских букв.

2) Создайте форму для параметрического запроса Запрос2_10, в которой значение параметра нужно не вводить, а выбирать из списка.

Создайте вспомогательную форму для выбора названия фирмы из списка. На форму поместите элемент поле со списком и две кнопки.

Установите свойства формы:

Выбор фирмы Подпись Тип границы Окна диалога Полосы прокрутки Отсутствуют Область выделения Нет Форма для выбора названия фирмы Поле номера записи Нет Разделительные линии Нет Всплывающее окно Да Модальное окно Да Измените свойства кнопок:

Первая кнопка Вторая кнопка Имя ОК Имя Отмена Подпись ОК Подпись Отмена По умолчанию Да Отмена Да У элемента поле со списком установите свойства:

Имя ПолеФирмы SELECT Фирмы.Название FROM Фирмы;

Источник строк Для указания значения свойства «Источник строк» воспользуйтесь построителем выражений в этом поле.

Созданная форма должна иметь вид, приведенный на рисунке выше.

Создайте с помощью мастера форму для запроса Запрос2_10. Скопируйте эту форму под именем Запрос2_10_Выбор. Свойство «Источник записей» сделайте пустым.

Добавьте в модуль формы Запрос2_10_Выбор обработку события «Загрузка (Load)». Оно возникает при открытии формы и выводе на экран ее записей. В этот момент нужно определить, для какой фирмы показать информацию. Для этого будет использована форма Выбор_фирмы, которую требуется вывести на экран. Текст модуля приведен ниже.

'Form_Запрос2_10_Выбор: модуль класса Option Compare Database Option Explicit Private Sub Form_Load() DoCmd.OpenForm "Выбор_фирмы",,,,, acDialog End Sub Методы объекта DoCmd (Команда), позволяют запускать макрокоманды Microsoft Access из программ VBA. В нашем примере он используется для открытия (OpenForm) и закрытия (Close) формы.

В модуле формы Выбор_фирмы требуется написать процедуры обработки события Нажатие кнопки (Click) для кнопок ОК и Отмена. Текст модуля приведен ниже.

Значение свойства «RecordSource» (Источник данных) определяет данные, выводимые на форме. В данном случае используется инструкция SQL. Её можно скопировать из запроса Запрос2_10 и изменить последнюю строку. Синтаксис VBA требует, чтобы текстовая информация была заключена в кавычки ("). Так как получается очень длинная строка, она разделена на «кусочки», для «склеивания» которых используется операция конкатенации (символ &). Полученное выражение располагается в программе на нескольких строках, поэтому в конце каждой такой строки стоит символ продолжения ( _ ). Это тоже требование синтаксиса VBA. Переменная ПолеФирмы.Text во время выполнения программы будет содержать название выбранной фирмы. Поэтому в форму будут загружены данные только для нужной фирмы.

'Form_Выбор_фирмы: модуль класса Option Compare Database Option Explicit Private Sub ОК_Click() ПолеФирмы.SetFocus Forms![Запрос2_10_Выбор].RecordSource = _ "SELECT Склады.НомерСклада, Склады.Адрес, " & _ "Склады.Телефон " & _ "FROM Фирмы INNER JOIN Склады " & _ "ON Фирмы.КодФирмы = Склады.КодФирмы " & _ "WHERE Фирмы.Название = ' " & ПолеФирмы.Text & " ' " DoCmd.Close acForm, "Выбор_фирмы", acSaveNo End Sub Private Sub Отмена_Click() DoCmd.Close acForm, "Выбор_фирмы", acSaveNo DoCmd.Close acForm, "Запрос2_10_Выбор", acSaveNo End Sub Итоговая самостоятельная работа 1. Разработайте свой проект БД (минимум 3 связанных таблицы, содержащей данные различных типов) для любой предметной области.

2. Используя все рассмотренные возможности MS Access, создайте:

по 2 запроса каждого типа (параметрический, перекрестный, с вычисляемыми полями, с группировкой, SQL, на действие: создание таблицы, добавление записей, обновление, удаление записей).

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

2 отчета с вычисляемыми полями.

3. Создайте макросы на открытие каждого из созданных объектов.

4. Создайте форму с кнопками, нажатие на каждую из которых будет запускать соответствующий макрос (на кнопки поместите текст, соответствующий выполняемому действию).

5. Создайте макрос, позволяющий при каждом открытии БД открывать на весь экран кнопочную форму.

Содержание:

1. Основные понятия теории баз данных..................................................2. Система управления базами данных MS Access..................................2.1 Архитектура MS Access......................................................................2.2 Импорт данных....................................................................................3. Проектирование базы данных................................................................4. Пример проектирования БД.................................................................5. Создание новой (пустой) базы данных................................................5.1 Создание таблицы в режиме конструктора.....................................5.2 Работа с данными таблицы...............................................................5.3 Просмотр данных в виде формы......................................................5.4 Добавление записей с помощью формы.........................................5.5 Поиск и замена данных.....................................................................5.6 Сортировка данных...........................................................................5.7 Фильтрация данных...........................................................................Упражнение 1...............................................................................................6. Создание запросов.................................................................................6.1 Создание запросов на выборку........................................................6.2 Запрос с параметром (параметрический запрос)............................6.3 Перекрестный запрос........................................................................Упражнение 2...............................................................................................6.4 Вычисляемые поля в запросах.........................................................6.5 Итоговые запросы..............................................................................Упражнение 3...............................................................................................7. Модификация данных с помощью запросов.......................................7.1 Запрос на создание таблицы.............................................................7.2 Запрос на обновление........................................................................7.3 Запрос на добавление записей..........................................................7.4 Запрос на удаление записей.............................................................. Упражнение 4...............................................................................................Самостоятельная работа.............................................................................8. Создание запросов с использованием языка SQL..............................8.1 Синтаксис инструкции SELECT в MS Access................................8.2 Предложение FROM..........................................................................8.3 Предложение GROUP BY.................................................................8.4 Предложение HAVING.....................................................................8.5 Предложение ORDER BY.................................................................8.6 Инструкция SELECT.........................................................................8.7 Подчиненный запрос (вложенная выборка)...................................Упражнение 5...............................................................................................9. Создание форм и отчетов......................................................................9.1 Создание формы................................................................................9.2 Формы для связанных таблиц..........................................................9.3 Создание элементов формы или отчета..........................................9.4 Добавление вычисляемых выражений в формы и отчеты 9.5 Применение условного форматирования........................................Упражнение 6...............................................................................................9.6 Создание отчета.................................................................................Упражнение 7...............................................................................................10. Автоматизация работы в MS Access....................................................10.1 Использование макросов..............................................................10.2 Использование VBA (создание модулей)...................................Упражнение 8...............................................................................................Итоговая самостоятельная работа.............................................................Рекомендуемая литература 1. Дж. Вейскас. Эффективная работа с MS Access 2000. Санкт-Петербург: «Питер», 2001.

Объем - 4,Тираж – 1200 экз.

Заказ

Pages:     | 1 |   ...   | 5 | 6 ||






© 2011 www.dissers.ru - «Бесплатная электронная библиотека»

Материалы этого сайта размещены для ознакомления, все права принадлежат их авторам.
Если Вы не согласны с тем, что Ваш материал размещён на этом сайте, пожалуйста, напишите нам, мы в течении 1-2 рабочих дней удалим его.