Синтаксис
Sub Form_CompleteDrag(effect As Long)
Части синтаксической последовательности для события CompleteDrag представлены в таблице:
Часть
|
Описание
|
effect
|
Длинное целое, устанавливаемое объектом отправителем,
определяющее действие, которое было выполнено. Позволяет отправителю выбрать
соответствующее действие в случае, если компонент был перемещен (как,
например, при удалении отправителем данных при его перемещении из одного
компонента в другой). Допустимые значения представлены в таблице Установок.
|
Установки
Установки effect:
Константа
|
Установка
|
Описание
|
vbDropEffectNone
|
0 |
Получатель операции перетаскивания не может принять данные
или операция перетаскивания была отменена.
|
VbDropEffectCopy | 1 | Операция перетаскивания привела к передаче копии данных отправителя получателю. Исходные данные в результате операции не изменились. |
VbDropEffectMove | 2 | Операция перетаскивания привела к перемещению данных из отправителя в получатель. Данные отправителя должны быть удалены из него после перемещения. |
Примечания
Событие OLECompleteDrag является заключительным событием операции перетаскивания OLE. Это событие информирует компонент отправитель о действии, которое было выполнено, когда объект был перетащен на компонент получатель. Получатель устанавливает значение с помощью параметра effect события OLEDragDrop. На основании этого отправитель может определить подходящее действие, которое необходимо предпринять. Например, если объект был перемещен в получатель (vbDropEffectMove), то необходимо удалить объект из отправителя после перемещения.
Если параметр OLEDragMode устанавливается в значение Automatic,
тогда Visual Basic выполняет действия по умолчанию. Однако событие все еще происходит,
позволяя пользователю добавлять или изменять эти действия.
Большинство компонентов поддерживают события перетаскивания OLE в ручном режиме,
а некоторые поддерживают события перетаскивания OLE в автоматическом режиме.