Экономическая информатика-стр.404

Рис. 8.16. Окно сообщения: а - о событии 1; б- о событии 2

8.5.2. ОБРАБОТКА СОБЫТИЙ МЫШИ

VBA поддерживает пять событий мыши. Их описание приведено ниже.

Событие

Описание

Click, DblClick

События происходят, когда нажимается, а

затем отпускается кнопка мыши (щелчок и

двойной щелчок)

MouseDown

Происходит, когда нажимается кнопка

мыши

MouseUp

Генерируется при отпускании клавиши

мыши. Возникает после события

MouseDown

MouseMove

Генерируется при перемещении мыши

Обработка событий Click и DblClick

Когда создается форма, то для каждого ее элемента Visual Basic создает процедуру обработки события Click, а точнее ее заголовок и окончание:

Private Sub Имя Элемента Управления_СНск()

End Sub

где Имя Элемента Управления - имя элемента управления, вызвавшего событие;

Click    - имя события.

Для обработки события достаточно в процедуру вставить программный код. Например, для командной кнопки, управляющей завершением работы программы, процедура обработки события Click выглядит следующим образом:

Private Sub CommandButtonl_Click()

End ' Код процедуры обработки события End Sub

Рассмотрим пример программы обработки события Click и DblClick, которая выдает сообщение о щелчке мыши и о двойном щелчке. Для создания программы выполните следующие действия:

1.    Создайте проект с пустой экранной формой.

2.    Свойству Name формы установите значение frmMouse, а свойству Caption - пустое значение.