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, расположив их слева направо. Продемонстрируйте работу модулей.


 

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

20535. Обработка файла данных 23.5 KB
  Данные по машинам автобазы: номер марка план перевозок факт. Макет исходных данных номер марка план факт о 367 нр ГАЗ 105 100 л 577 ор ЗИЛ 185 185 н 705 ар КамАЗ 220 220 в 368 еу ЛИАЗ 343 340 а 859 ср МАЗ 368 368 у 364 ар УАЗ 373 373 м 290 ао КамАЗ 288 287 н 390 ал ГАЗ 100 99 Алгоритм программы Программа по разработанному алгоритму Командный файл Обработка файла данных CLEAR {Очистка экрана} SET TALK OFF {Команда запрета выполнения отдельных команд} USE Imfd...
20536. Изучение принципов микропрограммного управления 23 KB
  Владимир 2000 Цель работы: Изучение принципов построения микропрограммного устройства управления. Развитие методов параллельной обработки данных и параллельного программирования показало что сложные алгоритмы могут быть эффективно реализованы при микропрограммном управлении что обусловило применение принципов микропрограммного управления в ЭВМ высокой производительности. Микропрограммный принцип управления обеспечивает реализацию одной машинной команды путем выполнения микрокоманд записанных в постоянной памяти.
20537. КЭШ память с прямым распределением 32 KB
  Владимир 2000 Цель работы: Изучение принципа построения кэшпамяти с пря мым распределением. Введение Кэшпамять это быстродействующая память расположенная между центральным процессором и основной памятью. В больших универсальных ЭВМ основная память которых имеет емкость порядка 3264 Мбайт обычно используется кэшпамять емкость 64256 Кбайт т.
20539. Уравнение Беллмана для непрерывных процессов 92.5 KB
  Разобьем этот интервал на 2 интервала Рис Где бесконечно малая величена Запишем уравнение 3 на этих 2х отрезках Используя принцип оптимальности: 4 Обозначим через Подставив в 4 Поскольку значение от выбора управления не зависит то ее можем внести под знак минимума и тогда выражение 5 Разделим каждое слагаемое этого уровня на Перейдем к приделу при На основании теоремы о среднем значении интеграла на бесконечно малом отрезке времени Пояснение Рисунок Тогда 5а 6 полная производная этой функции. Вместо Полученное...
20540. Многокритериальные задачи теории принятия решений 31.5 KB
  Проблему решения оптимизационных задач с учетом множества показателей эффективности называют проблемой решения многокритериальных задач или проблемой векторной оптимизации. Формулировка проблемы оптимизации по векторному критерию была в первые сформулирована Вильфредо Парето 1896г. Таким образом проблема векторной оптимизации это проблема принятия компромиссного решения. В настоящие время можно выделить 4 подхода к основной проблеме векторной оптимизации: т.
20541. Множество решений, оптимальных по Парето 153 KB
  Пусть задача принятия решения состоит в максимизации двух противоречивых и не сводимых друг к другу. Кривая АВ определяет для рассматриваемого примера область Парето которая характеризуется тем свойством что любое принадлежащий этой области решения нельзя улучшить одновременно по всем скалярным критерием. Действительно выбрав произвольно точку М в допустимой области решения не лежащую на кривой АВ не трудно убедится что определяемая ее решению можно улучшить по критерию в точке и максимум в точке достигает максимума. Из сказанного...
20542. Основная задача управления 36.5 KB
  Пусть компоненты управления u представляют собой кусочнонепрерывные функции времени с конечным числом точек разрыва или параметрами. Значение вектора управления u принадлежат заданой допустимой области U uU границы которой могут быть функции времени. Задача определения управления гарантирующего выполнения ограничения1 является типичной задачей управления которую назовем ОЗУосновная задача управления.
20543. Геометрическая интерпретация ОЗУ 323.5 KB
  Пусть вектор управления U и вектор функционала J имеет по две компоненты: U=U1 U2; J=J1 J2 Управление принимает свои значения из области U а функционалы J из прямоугольника a1≤J1≤A2; a2≤J2≤A1 Задавая различные управления U1U2 из области U и используя уравнение процесса получим на плоскости функционалов некоторую область В. область U отображается в область В. Пересечение областей А и В это есть область выполнения ограничений при допустимых управлениях U. При заданной области допустимых управлений U реализуется область Au= А∩В...