Самоучитель VBA

Общие методы и события элементов управления



Общие методы и события элементов управления

Перечислим основные общие методы элементов управления.

Add




Позволяет добавить элемент управления во время выполнения программы

Move

Перемещает элемент управления

Zorder

Помешает объект до или после всех пересекающихся с ним объектов

SetFocus

Устанавливает фокус на вызвавшем этот метод элементе управления. Часто применяется в программах обработки ошибок

Перечислим наиболее часто употребляемые общие события элементов управления.

Click

Происходит, когда пользователь выбирает элемент управления с помощью одинарного щелчка кнопкой мыши

DblClick

Происходит, когда пользователь выбирает элемент управления с помощью двойного щелчка кнопкой мыши

KeyPress

Происходит, когда пользователь нажимает любую клавишу на клавиатуре, кроме функциональных и клавиш управления курсором

Change

Происходит при изменении значения элемента управления

GotFocus И LostFocus

Происходит, когда элемент управления получает или теряет фокус

Error

Используется при уведомлении об ошибке

Рассмотрим синтаксис процедур обработки событий, генерируемых нажатием кнопки мыши и перемещением указателя мыши и связанных с элементами управления (табл. 7.4).

Таблица 7.4. События, связанные с нажатием кнопки мыши

и перемещением мыши

Событие

Событие происходит

MouseDown

При нажатии кнопки мыши

MouseUp

При отпускании кнопки мыши

MouseMove

При перемещении указателя мыши

Синтаксис:

Private Sub object_MouseDown( ByVal Button As fmButton,

ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)

Private Sub object_MouseUp( ByVal Button As fmButton,

ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)

Private Sub object_MouseMove( ByVal Button As fmButton,

ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)

Аргументы:

Button

Возвращает код (значение) нажатой кнопки мыши. Допустимые значения:

  • fmButtonLeft или 1 (левая)
  • fmButtonRight или 2 (правая)
  • fmButtonMiddle или 4 (средняя)

Shift

Возвращает код (значение) нажатой на клавиатуре клавиши. Допустимые значения:

  • fmShiftMask или 1 (<Shift>)
  • fmCtrlMask или 2 (<Ctrl>)
  • fmAltMask или 4 (<Alt>)

X И Y

Возвращает значение расстояния от левого или от верхнего края формы, рамки или страницы. При событии MouseMove этим расстоянием считается путь в направлении от левого верхнего угла элемента управления по горизонтали или вертикали

Рассмотрим синтаксис процедур обработки событий при операциях drag-and-drop, связанных с элементами управления (табл. 7.5).

Таблица 7.5. События, связанные с перемещением элемента управления

Событие

Событие происходит

BeforeDragOver

BeforeDropOr Paste

Пока совершается операция drag-and-drop

Перед завершением операции drag-and-drop

Синтаксис:

Private Sub object_BeforeDragOver( ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As

DataObject, ByVal X As Single,

ByVal Y As Single,

ByVal DragState As fmDragState,

ByVal Effect As MSForms.ReturnEffect,

ByVal Shift As fmShiftState)

Private Sub

object_BeforeDropOrPaste( ByVal Cancel As MSForms.ReturnBoolean,

ByVal Action As fmAction,

ByVal Data As DataObject,

ByVal X As Single,

ByVal Y As Single,

ByVal Effect As MSForms.ReturnEffeet,

ByVal Shift As fmShiftState)

Аргументы:

Cancel

Допустимые значения: False (по умолчанию, элемент управления обрабатывает событие) и True (приложение обрабатывает событие)

Data

Данные, перемещаемые во время операции drag-and-drop. Эти данные размещаются в объекте DataObject. Объект DataObject — это своеобразный аналог буфера обмена, в отличии от которого в нем допускается хранить только текстовую информацию

X и Y

Расстояние от левого верхнего угла элемента управления по горизонтали и вертикали

DragState

Устанавливает позицию указателя мыши относительно целевого объекта. Допустимые значения:

  • fmDragStateEnter или о (указатель мыши внутри целевого элемента управления)
  • fmDragStateLeave или 1 (указатель мыши вне целевого элемента управления)
  • fmDragStateOver или 2 (указатель мыши в новой позиции, но остается внутри элемента управления)

Effect

Устанавливает операцию, производимую над объектом. Допустимые значения:

  • fmDropEffectNone или о (не копировать и не перемещать объект)
  • fmDropEf fectcopy или 1 (копировать» объект)
  • fmDropEf fectMove или 2 (перемещать объект)
  • fmDropEf fectCopyOrMove или з (копировать или перемещать объект)

Shift

Возвращает код (значение) нажатой на клавиатуре клавиши. Допустимые значения:

  • fmShiftMask или 1 (<Shift>)
  • fmCtrlMask или 2 (<Ctrl>)
  • fmAltMask или 4 (<Alt>)



Содержание  Назад  Вперед