6529

Модули в СУБД ACCESS. Создание процедур

Конспект урока

Информатика, кибернетика и программирование

Модули в СУБД ACCESS. Создание процедур Предполагаем освоение следующих вопросов: Понятие модуля. Назначение процедур. Виды процедур: процедура обработки события процедура преобразования. Типы процедур процедуры-подпрограммы (Su...

Русский

2013-01-05

42 KB

16 чел.

Модули в СУБД ACCESS. Создание процедур

Предполагаем освоение следующих вопросов:

  1.  Понятие модуля.
  2.  Назначение процедур.
  3.  Виды процедур:

процедура обработки события;

процедура преобразования.

4 Типы процедур

процедуры-подпрограммы (Sub);

процедуры-функции (Function)

  1.  Типы переменных
  2.  Основные операторы языка VBA

Модулем называется объект базы данных Access содержащий совокупность созданных пользователем и хранящихся совместно процедур

Процедуры создаются для обработки событий, связанных с изменениями в формах, и отчетах (процедура обработки события) и для осуществления определенных преобразовании (процедура преобразования)

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

ВАРИАНТ ПОДГОТОВИТЕЛЬНЫЙ 

  1.  Процедуры обработки событий

ЗАДАНИЕ 1. Создать процедуру обработки события, которая отображает в форме Форма_2 индикаторы текущей даты и времени.

Рекомендации по выполнению

  1.  Откройте форму Форма_2 в Режиме конструктора
  2.  Добавьте в область Заголовок формы две надписи Дата и Время, щелкнув на Панели элементов по кнопке [Надпись] и нарисовав рамки для надписей.
  3.  Задайте имя надписям Дата и Время Для этого в окне Свойства для надписи Дата на вкладке Все: в строку Имя введите Дата, а в окне Свойства для надписи Время на вкладке Все в строку Имя введите Время.
  4.  Для создания процедуры обработки события, откройте окно Свойства дня формы Форма_2, выполнив команду Вид  Свойства, предварительно сняв выделение со всех элементов формы.
  5.  Установите значение интервала таймера формы равным 1000. Для этого в окне Свойства перейдите на вкладку События и в строку Интервал таймера введите 1000.
  6.  Выберите из раскрывающегося списка строки Таймер [Процедура обработки событий]. Далее для открытия окна Модуля нажмите на три точки в конце строки Таймер.
  7.  Введите текст процедуры. Он будет следующим.

Private Sub Form_Timer()

Время. Caption = Time 'устанавливает текущее время

Дата. Caption = Date 'устанавливает значение текущей даты

End Sub

Все комментарии к операторам пишутся после пака апострофа (') в одну строку Если комментарий занимает несколько строк, то вначале каждой строки следует ставить знак апостроф (').

  1.  Откомпилируйте полученный модуль, выполнив команду Отладка Компилировать загруженные модули. Если возникли какие-то ошибки, исправьте их и снова откомпилируйте модуль.

  1.  Проверьте работу модуля, открыв форму Форма_2 в режиме формы. В области заголовка должны появиться текущая дата и текущее время.

ЗАДАНИЕ 2. Создать процедуру обработки события, которая в форме Форма_1 устанавливает цвет подписи Отклонение зеленым, цвет поля — голубым.

Рекомендации по выполнению

  1.  Откройте форму Форма_1 в Режиме конструктора.
  2.  Для создания процедуры обработки события, откройте окно Свойства для формы Форма_1. 
  3.  Задайте имя подписи и полю Отклонение и Отклонение1 соответственно.
  4.  На вкладке События выберите из раскрывающегося списка строки Текущая запись Процедура обработки событий. Далее для открытия окна Модуля нажмите на три точки в конце этой строки.
  5.  Введите текст процедуры. Он будет следующим:

Private Sub Form_Current()

Const conClear = 0

Ме!Отклонение. ВасkСо1ог = 65280 'устанавливает зеленый цвет подписи

Me!Отклонение 1.BackColor = 16776960 'устанавливает голубой цвет поля

End Sub

  1.  Откомпилируйте полученный модуль. Если возникли какие-то ошибки, исправьте их и снова откомпилируйте модуль.
  2.  Проверьте работу модуля, открыв форму Форма_1 в режиме формы.

ЗАДАНИЕ 3. Создать процедуру обработки события, которая в форме Форма_1 устанавливает цвет поля Сорт красным для изделий высшего сорта.

Для выполнения этого задания к предыдущей процедуре следует добавить строку:

If Me!Copm = "высший" Then Me!Copm. BackColor = 255

ЗАДАНИЕ 4. Создать процедуру обработки события, которая в отчете Отчет_1 увеличивает значение поля Количество выпущенных по плану на 20%.

ОТЧЕТ ПО РАБОТЕ. Представьте на экране формы Форма_1 и Фор- ма_2, отчет Отчет_1, расположив их слева направо. Продемонстрируйте работу модулей.


 

А также другие работы, которые могут Вас заинтересовать

24841. Сети отделов 27.32 KB
  Главной целью сети отдела является разделение локальных ресурсов таких как приложения данные лазерные принтеры и модемы. Обычно сети отделов имеют один или два файловых сервера и не более тридцати пользователей рис. Сети отделов обычно не разделяются на подсети.
24842. Сети кампусов 58.51 KB
  Сети этого типа объединяют множество сетей различных отделов одного предприятия в пределах отдельного здания или в пределах одной территории покрывающей площадь в несколько квадратных километров. Службы такой сети включают взаимодействие между сетями отделов доступ к общим базам данных предприятия доступ к общим факссерверам высокоскоростным модемам и высокоскоростным принтерам. Пример сети кампуса Именно на уровне сети кампуса возникают проблемы интеграции неоднородного аппаратного и программного обеспечения.
24843. Корпоративные сети 65.42 KB
  Сети масштаба предприятия корпоративные сети объединяют большое количество компьютеров на всех территориях отдельного предприятия. Для соединения удаленных локальных сетей и отдельных компьютеров в корпоративной сети применяются разнообразные телекоммуникационные средства в том числе телефонные каналы радиоканалы спутниковая связь. Пример корпоративной сети Непременным атрибутом такой сложной и крупномасштабной сети является высокая степень гетерогенности нельзя удовлетворить потребности тысяч пользователей с помощью однотипных...
24844. Вычислительная сеть 18.62 KB
  Качество доступа к ресурсу как глобальная характеристика функционирования сети может быть описана многими показателями выбор которых зависит от задач стоящих перед вычислительной сетью. Производительность вычислительной сети может быть оценена с разных позиций. С точки зрения пользователя важным числовым показателем производительности сети является время реакции системы особенно в той части которая относится к работе сети.
24845. Стандартные стеки коммуникационных протоколов 21.42 KB
  Три основных момента: Существует множество протоколов и хотя все они участвуют в реализации связи каждый протокол имеет различные цели выполняет различные задачи обладает своими преимуществами и ограничениями. Несколько протоколов могут работать совместно. В этом случае они образуют так называемый стек или набор протоколов Работа различных протоколов должна быть скоординирована так чтобы исключить конфликты или незаконченные операции.
24846. К локальным сетям - Local Area Networks (LAN) 13.54 KB
  Изза коротких расстояний в локальных сетях имеется возможность использования относительно дорогих высококачественных линий связи которые позволяют применяя простые методы передачи данных достигать высоких скоростей обмена данными порядка 100 Мбит с. В связи с этим услуги предоставляемые локальными сетями отличаются широким разнообразием и обычно предусматривают реализацию в режиме online.
24847. Глобальные сети - Wide Area Networks (WAN) 13.78 KB
  Так как прокладка высококачественных линий связи на большие расстояния обходится очень дорого в глобальных сетях часто используются уже существующие линии связи изначально предназначенные совсем для других целей. Изза низких скоростей таких линий связи в глобальных сетях десятки килобит в секунду набор предоставляемых услуг обычно ограничивается передачей файлов преимущественно не в оперативном а в фоновом режиме с использованием электронной почты. Для устойчивой передачи дискретных данных по некачественным линиям связи применяются...
24848. Оценка стоимости облигационного займа 27 KB
  Стоимость облигационного займа приблизительно равна доходу который получает держатель облигаций. Проценты по облигационным займам выплачиваются из чистой прибыли поэтому корректировка стоимости облигационного займа на налог на прибыль не производится.
24849. Повышение рыночной стоимости 31.5 KB
  Управление стоимостью компании это современная стратегия менеджмента ориентированная на повышение инвестиционной привлекательности конкурентных преимуществ и устойчивой работы в рыночной среде в расчете на длительную перспективу. Отмечено что повышение рыночной стоимости компании является стратегической целью управления. Фактор создания стоимости представляется как некоторый элемент социальноэкономической системы влияющий на количественные и качественные параметры компании от которых зависит ее рыночная цена а управление стоимостью ...