Основы офисного программирования и язык VBA


Событие BeforeDragOver (Перед завершением перетаскивания)


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

Набор параметров, передаваемых процедуре обработки события BeforeDragOver, зависит от вида элемента управления. Они имеют следующий вид.

  • для рамки (Frame) :

    Private Sub объект_BeforeDragOver (ByVal Cancel As MSForms. ReturnBoolean, ctrl As Control, 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) ;

  • для набора страниц (MultiPage) :

    Private Sub объект_BeforeDragOver (index As Long, ByVal Cancel As MSForms. ReturnBoolean, ctrl As Control, 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) ;

  • для полосы вкладок (TabStrip) :

    Private Sub объект_BeforeDragOver (index As Long, 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 объект_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).

Здесь объект - имя объекта, которому принадлежит процедура, index - индекс вкладки из набора вкладок, затрагиваемой операцией перетаскивания, Cancel - обязательный статус обработки события, False означает, что оно будет обрабатываться элементом (по умолчанию), True показывает, что событие будет обрабатываться приложением. Параметр ctrl - тот элемент, перетаскивание которого завершается.


Начало  Назад  Вперед