Книга: Основы программирования в среде Visual Basic for Application VBA

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.ReturnEffect, _

ByVal Shift As fmShiftState)

Аргументы:

Cancel Допустимые значения: False (по умолчанию, элемент управления обрабатывает событие) и True (приложение обрабатывает событие)
Data Данные, перемещаемые во время операции drag-and-drop. Эти данные размещаются в объекте DataObject. Объект DataObject это своеобразный аналог буфера обмена, в отличии от которого в нем допускается хранить только текстовую информацию
X и Y Расстояние от левого верхнего угла элемента управления по горизонтали и вертикали
DragState

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

fmDragStateEnter или 0 (указатель мыши внутри целевого элемента управления)

fmDragStateLeave или 1 (указатель мыши вне целевого элемента управления)

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

Effect

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

- fmDropEffectNone или 0(не копировать и не перемещать объект)

fmDropEffectCopy или 1 (копировать объект)

fmDropEffectMove или 2 (перемещать объект)

fmDropEffectCopyOrMove или 3 (копировать или перемещать объект)

Shift

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

-fmShiftMask ИЛИ 1 (<Shift>)

-fmCtrlMask ИЛИ 2 (<Ctrl>)

- fmAltMask ИЛИ 4 (<Alt>)

2.8 Стандартные объекты и элементы управления

2.8.1 Объект DataObject

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

GetText

Возвращает текстовую строку из объекта DataObject.

Синтаксис:

String = object.GetText

SetText

Копирует текстовую строку в объект DataObject.

Синтаксис:

SetText(StoreData)

- StoreData определяет данные, копируемые в

К-во Просмотров: 298
Бесплатно скачать Книга: Основы программирования в среде Visual Basic for Application VBA