10.Выполнение макроса при определенном условии
Пример 10.1. Пусть при вводе данных о
новом объекте в форме Объекты
требуется предусмотреть вывод
предупреждающего сообщения, если срок
строительства объекта (т.е. разность
даты окончания строительства и даты
заключения контракта) составляет меньше
30 дней.
Макрос для данной задачи создается
следующим образом.
Перейти
на вкладку Макросы.
Нажать кнопку Создать.
Выбрать
из меню команду Вид –
Условия. В окне описания макроса
появляется колонка Условие.
В колонке
Условие ввести
условие: [Дата окончания]-[Дата
заключения]<30. Никаких знаков в
конце условия не ставится.
Ввести
макрокоманду Сообщение.
Указать ее аргументы: Сообщение
– Срок меньше месяца! (т.е. текст
сообщения, который должен выводиться
на экран при выполнении условия), Сигнал
– Да, Тип –
Предупреждающее!.
Закрыть
окно макроса, сохранив его под именем
Предупреждение.
Подключение макроса выполняется
следующим образом.
Перейти
на вкладку Формы.
Открыть форму Объекты в режиме
Конструктора.
Щелкнуть
правой кнопкой мыши на поле Дата
окончания (именно на поле, а не на
подписи к нему). Выбрать команду Свойства.
На вкладке События
в строке После обновления
выбрать имя вызываемого макроса:
Предупреждение. Закрыть окно
свойств.
Сохранить
изменения формы. Закрыть форму.
Попробовать
ввести данные о двух объектах, для
одного из которых срок строительства
составляет больше 30 дней, а для другого
– меньше (остальные данные – произвольные).
Убедиться, что при вводе данных об
объекте со сроком строительства меньше
30 дней выводится заданное сообщение.