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


 

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

15030. Ә.Нұрпейісовтың Қан мен тер романына салыстырмалы-салғастырмалы талдау 68.5 KB
  УДК 828.215.121.22 ЄБДІЖЄМІЛ НҰРПЕЙІСОВТЫЊ ЌАН МЕН ТЕР РОМАНЫНА САЛЫСТЫРМАЛЫСАЛЃАСТЫРМАЛЫ ТАЛДАУ Жиенхан Айжан Коржунбаева Меруерт Қанапияқызы Б.Ахметов атындағы Павлодар педколледжі Қан мен тер трилогиясының сюжеттік – композициялық желілері де бір...
15031. Әдеби жанрлар 64 KB
  Әдеби жанрлар Әдеби жанрлар фр. тілінде genre түр тек жанр [346 246] – ауызша және жазбаша шығармалардың көркем даму процесінде қалыптасады. Шығарма жанры дәстүрлі түрде мынадай негізгі белгісі бойынша анықталады бір жанрдағы шығармаларды біріктіретін және ай
15032. Әдеби шығарма, көркем мәтінді проблемалық талдай оқыту жолдары 42 KB
  Қазіргі педагогтың кәсіби біліктілігі. Қарағанды қалалық білім басқармасы Білім дамыту Орталығы V қалалық ғылымиәдістемелік конференциясының жадығаттары 28 сәуір 2003ж.Қарағанды 2003ж. 35 бет Әдеби шығарма көркем мәтінді проблемалық талдай оқыту жолдары Ахано...
15033. Әдебиет пен сынның биік белесі 49.5 KB
  ӘДЕБИЕТ ПЕН СЫННЫҢ БИІК БЕЛЕСІ Nov 202006 00:00 by oljas Қазіргі қазақ әдебиеті сынының тарихына оның жүріп өткен жолына көркемдік сапа деңгейі тұрғысынан қарағанда бірнеше айтулы кезеңдерді атап өтуге болар еді. ХХ ғасырдың 2030 жылдарында алаш арыстары негізін қалаған осылар...
15034. Әлем әдебиетіндегі сентиментализм 54 KB
  Әлем әдебиетіндегі сентиментализм ...Өткен ғасырлар үлесіндегі әлем әдебиетінде көптеген әдеби ағымдардың болғаны баршаға аян. Сол ағымдардың ішіндегі 18ғасыр дың екінші жартысы мен 19ғасырдың басында дамыған ағым – сентиментализм. Сентиментализм французша сезім с
15035. Жүрегі жүз жыл жырлаған (Жамбыл) 85 KB
  Жүрегі жүз жыл жырлаған Менің пірім Сүйінбай... Қазақ халқы табиғатынан ақын халық. Есте жоқ ескі замандардан бергі ел тарихының көркем шежіресін жасаушылар да оның сақтаушылары да сөз зергерлері – ақындар. Ғасырдан ғасырға жалғасып атадан ұрпаққа мирас ...
15036. Жүсіп Баласағұн шығармаларының Қазақ ақындарымен сабақтастығы 56.5 KB
  Жүсіп Баласағұнның және ХІХХХ ғасыр басындағы қазақ әдебиеті өкілдерінің шығармашылығындағы замана бейнесі Түркі әлеміне есімі мәшһүр болып қайта өрлеу дәуірінің аса көрнекті ақыны данышпанойшылы Жүсіп Баласағұн өнегелі ойтолғамдарын өзінің Құтадғу білік
15037. Жыр жампозы - Жамбыл 47 KB
  ӘОЖ 801: 894.342 ЖЫР ЖАМПОЗЫ К.Ж. Демеш Жамбыл облысы әкімияты Тараз қ. Қашанда халық арасынан өнерімен елді сүйсіндірген адамдар шығып отырған. Олар елді қиынқыстау шағында қиыншылықтан шығуға қол ұшын берумен қатар рухани тірегі бола білді. Ел мақтанышына айна
15038. Жырау мен жыршылдық дәстүрдің Қазақ әдебиетіндегі қалыптасуы 52.5 KB
  ӘОЖ 378.147:8.0 ЖЫРАУ МЕН ЖЫРШЫЛЫҚ ДӘСТҮРДІҢ ҚАЗАҚ ӘДЕБИЕТІНДЕГІ ҚАЛЫПТАСУЫ А.Мұқашева Г.Мейірбекова Тараз мемлекеттік педагогикалық институты Тараз қ. Тарих қашан да өз перзенттерінің құнды мұраларымен қымбат әрі барлық кезеңдердің сарапшысы.Ерлігі м...