Visual Basic Reference
Начинает, заканчивает, или отменяет операцию перетягивания любого элемента управления кроме элементов управления Line, Menu, Shape, Timer, или CommonDialog. Не поддерживает именованные аргументы.
Синтаксис
object.Drag action
Синтаксис метода Drag состоит из следующих частей:
| Часть | Описание |
| object | Обязателен. Объектное выражение , выражающее объект в обращении. Если object опущен, принимается объект, который обращается к методу Drag. |
| action | Необязателен. Константа или значение, указывающее выполняемое действие, как описано в установках. Если action опущен, по умолчанию принимается начало перетягивания объекта. |
Установки
Установки для action:
| Constant | Значение | Описание |
| vbCancel | 0 | Отменяет операцию перетягивания |
| vbBeginDrag | 1 | Начинает перетягивание объекта object |
| vbEndDrag | 2 | Заканчивает перетягивание и оставляет объект object |
Примечания
Эти константы перечислены в object library Visual Basic (VB) в Object Browser.
Использование метода Drag для управления операцией перетягивания требуется только тогда, когда свойство объекта DragMode установлено равным Manual (0). Однако, вы можете использовать Drag для объекта, свойство DragMode которого установлено равным Automatic (1 или vbAutomatic).
Если вы хотите изменить форму указателя мыши на время пока объект перетягивается, используйте свойство DragIcon или MousePointer. Свойство MousePointer используется только в том случае, если свойство DragIcon указано.
Метод Drag, вообще говоря, действует синхронно, что означает что последующие операторы не будут выполнены пока действие перетягивания не завершится. Однако он может действовать асинхронно, если свойство DragMode для элемента управления установлено равным Manual (0 или vbManual).
