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


 

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

78262. Гемолитическая болезнь плода и новорожденного 128 KB
  Гемолитическая болезнь плода и новорожденного это изоиммунная гемолитическая анемия возникающая в случае несовместимости крови матери и плода по эритроцитарным антигенам когда антигеном являются эритроциты плода а антитела вырабатываются в организме матери. Чаще всего это заболевание развивается при несовместимости крови матери и плода по резусантигену и встречается с частотой 1 случай на 200250 родов. Несовместимость по антигенам АВ0 приводящая к гемолитической болезни обычно развивается при группе крови матери I и группе крови...
78263. Перинатальное поражение центральной нервной системы 132 KB
  Среди причин перинатальных поражений мозга ведущее место занимает внутриутробная и интранатальная гипоксия плода. После отхождения околоплодных вод плод испытывает неравномерное давление которое приводит к расстройствам микроциркуляции в предлежащей части и к механическому повреждению тканей мозга плода в родах. Непосредственной причиной возникновения родовой травмы головного мозга является несоответствие размеров костного таза матери и головы плода. Родовая травма головного мозга и гипоксия патогенетически связаны друг с другом и обычно они...
78264. Рахит у детей 138 KB
  Главное значение в этиологии заболевания имеет недостаточное поступление в организм ребенка витаминов группы D а также группы B B1 B2 B6 аскорбиновой кислоты витамина солей кальция фосфора магния и других микроэлементов белка и отдельных аминокислот в периоды внутриутробного и постнатального развития. Эндогенным фоном предрасполагающим к рахиту является свойственная растущему организму высокая скорость перемоделирования и роста скелета особенно в 1ый год жизни и обусловленная этими процессами большая потребность в солях...
78265. Аномалии конституции. Спазмофилия. Гипервитаминоз D у детей 137 KB
  Наличие у ребенка определенного типа диатеза еще не означает что он обречен на ту или иную патологию к которой он предрасположен потому что именно у детей по мере созревания физиологических барьеров а также профилактических мероприятий давление наследственных факторов может ослабнуть. Аллергическое поражение кожи у детей первых 3х месяцев жизни раньше рассматривали как экссудативнокатаральный диатез. Этот диатез встречается у 50 детей первых 2х лет жизни. ткани этих детей повышенно гидрофильны и одновременно гидролабильны.
78266. Гнойно-воспалительные заболевания у детей 164 KB
  В этих случаях с момента рождения у ребенка могут выявляться такие заболевания как везикулопустулез пузырчатка внутриутробная пневмония менингит сепсис и др. Однако основным путем является инфицирование ребенка после рождения. При необильном высыпании общее состояние ребенка не нарушено аппетит сохранен температура тела нормальная и реже субфебрильная а при обильном высыпании появляются симптомы интоксикации. Пузырчатка новорожденного Она развивается чаще в первые 2 недели жизни ребенка.
78267. Острые пневмонии у детей 135 KB
  Некоторые из них в том числе острые пневмонии являются одной из причин смертности детей в раннем возрасте хотя от пневмоний дети не должны умирать. Дети в этом возрасте длительное время находятся в горизонтальном положении что приводит к застою кровообращения в задненижних отделах легких и к более легкому возникновению пневмонии. Возникновению пневмонии способствуют также другие факторы а именно: несоблюдение эпидемиологического режима то есть инфицирование ребенка; неполноценное питание и плохой уход; охлаждение или перегревание...
78268. НИВЕЛИРОВАНИЕ. ГЕОМЕТРИЧЕСКОЕ НИВЕЛИРОВАНИЕ 27.54 KB
  Одиночные ходы и системы ходов должны опираться не менее чем на два исходных пункта. Проложение замкнутых ходов опирающихся на один исходный пункт допускается лишь при особой необходимости. При приложении нивелирных ходов для определения высот пунктов аналитических сетей относительно исходной основы со средними квадратическими погрешностями...
78269. Тахеометрическая съемкаемка 9. 163.31 KB
  При производстве тахеометрической съемки используют геодезический прибор тахеометр предназначенный для измерения горизонтальных и вертикальных углов длин линий и превышений. Для выполнения тахеометрической съемки используются также тахеометры с номограммным определением превышений и горизонтальных проложений линий. Производство тахеометрической съемки Тахеометрическая съемка выполняется с пунктов съемочного обоснования их называют станциями.
78270. Состав камеральных работ 166.31 KB
  Стороны угла проектируют на лимб с использованием подвижной визирной плоскости зрительной трубы. Она образуется визирной осью трубы при её вращении вокруг горизонтальной оси. Данную плоскость поочередно совмещают со сторонами угла ВА и ВС последовательно направляя визирную ось зрительной трубы на точки А и С...