Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
VBA_Labs.doc
Скачиваний:
1
Добавлен:
01.03.2025
Размер:
8.08 Mб
Скачать

Инструкции

StDocName = “Студент”

StLinkCriteria = “[НГ] =” & “ ’ ” & Me! [НГ] & “ ’ ”

являются инструкциями присваивания, благодаря которым переменные получают конкретные значения. Первая переменная сохраняет имя формы Студент, вторая — выражение, указывающее что связь таблиц осуществляется по полю НГ и выборка данных в открываемой форме Студент должна производиться по значению этого поля в текущей записи формы Группа. Для ссылок на элементы управления текущей формы или отчета в процедуpax VBA может быть использовано ключевое слово Me, заменяющее полный идентификатор текущего объекта — формы Группа Forms! [Группа] .

Аргументы инструкции разделяются запятыми. Аргументы DoCmd OpenForm в инструкции были пропущены, запятые фиксируют их отсутствие. В конце инструкции отсутствие недостающих аргументов не помечается.

1. Замените в процедуре ключевое слово Me на Forms! [группа] и убедитесь, что процедура работает по - прежнему.

2. Запишите в инструкцию выражение "[НГ]=" & " ' " & Mе![НГ] & " ' " в качестве аргумента, задающего условие отбора. При этом можно удалить инструкцию описания переменной stLinkCriteria и присваивания ей значения.

3. Если при работе с формой Студент вы хотите установить режим,

обеспечивающий только просмотр данных, запишите пятым аргументом в инструкции acFormReadOnly (только чтение). Приставка ас указывает, что качестве аргумента используется значение встроенной константы Access Убедитесь, что процедура работает правильно, а в форме Студент нет возможности изменять и добавлять данные.

Инструкция Exit Sub завершает выполнение процедуры. Инструкция

On Error GoTo Err Список _студентов_Click

позволяет при возникновении ошибки передать управление (GoTo) программе обработки ошибок.

Метка Еrr_Список_студентов_Click: определяет начало программы обработки ошибок.

Программа обработки ошибок помещена между инструкциями Exit Sub и End Sub, что позволяет отделить ее от части программы, соответствующей нормальному выполнению процедуры. В этой процедуре программа обработки ошибок включает две инструкции:

MsgBox – выводит стандартное сообщение об ошибке. Аргумент Err.Description определяет строковое значение, которое возвращается при ошибке. Description является свойством объекта Error (значением свойства Description является краткое предупреждающее сообщение с описанием ошибки);

Resume — передает управление на метку инструкции, завершающей выполнение процедуры.

Задание для самостоятельной работы

Создайте форму ИЗДЕЛИЯ на основе таблицы IZD, воспользовавшись режимом Автоформа: в столбец, а также форму OTGRUZKA, воспользовавшись режимом Автоформа: ленточная. Необходимо в форме для просмотра информации об изделиях создать кнопку, при нажатии которой, можно было открывать список отгружаемых товаров текущего изделия.

Контрольные вопросы

  1. Какой кнопкой на панели инструментов открывается окно модуля формы?

  2. Какие списки имеет окно модуля формы?

  3. Процедурой, какого типа должна быть процедура обработки события?

  4. Какой инструкцией начинается и заканчивается процедура - подпрограмма?

  5. Из чего формируется имя процедуры обработки события?

  6. Где устанавливается связь события с процедурой его обработки?

  7. Какая инструкция позволяет завершить выполнение процедуры?

  8. Какая инструкция предназначена для описания переменных?

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]