Это все, что нужно предпринять для создания события и формирования его в модуле класса. В следующем разделе описано использование события в форме.
Использование событий
Чтобы воспользоваться событием Welcome в модуле формы, необходимо объявить объектную переменную для cUser в разделе объявлений модуля и использовать ключевое слово WithEvents. Зарезервированное слово WithEvents применяется для отображения и использования событий объекта cUser. Соответствующий код приведен ниже:
' Данное выражение следует поместить в раздел объявлений модуля.
Private WithEvents objUser As cUser
СОВЕТ
Событие WithEvents можно использовать только в модулях класса (модули форм являются модулями класса). В стандартных модулях WithEvents использовать нельзя.
После объявления переменной на уровне модуля с помощью ключевого слова WithEvents необходимо в левом поле со списком в верхней части окна модуля выбрать объект cUser. В правом поле со списком будут отображены события объекта cUser. Выберите событие Welcome, и в окне кода появится процедура, в которой можно записать соответствующий код для ответа на событие.
|
|
На рис. 7 приведен код, отвечающий на событие Welcome.
РИСУНОК 7. Процедура, использующая событие Welcome объекта cUser.
В результате пользователь при каждом запуске приложения увидит всплывающий экран с приветствием (рис. 8).
РИСУНОК 8. Всплывающий экран с приветствием