Access树控件使用手册 更多
Access树控件使用手册手册介绍
1 Access树控件 开发历程
2 微软树控件的缺点
2.1 版本兼容出错
2.2 不支持64位的Office
3 Access树控件的优点
4 Access扩展控件库--版本选择
4.1 Treeview树控件对应Access的版本
4.2 Treeview树控件-免费与收费的区别
5 Access扩展控件库--树控件的创建和添加节点
6 Access扩展控件库--树控件节点图标
7 Access扩展控件库--树控件常用属性
7.1 Appearance 属性（ActiveX 控件）
7.2 BackColor 属性（ActiveX 控件）
7.3 BackPicture 属性（ActiveX 控件）
7.4 BorderStyle 属性（ActiveX 控件）
7.5 Checkboxes 属性
7.6 Container 属性（ActiveX 控件）
7.7 DropHighlight 属性（ListView 和 TreeView 控件）
7.8 EditBox 属性（ActiveX 控件）
7.9 Enabled 属性（ActiveX 控件）
7.10 Font 属性（ActiveX 控件）
7.11 FullRowSelect 属性（ActiveX 控件）
7.12 Height 属性（ActiveX 控件）
7.13 HideSelection 属性（ActiveX 控件）
7.14 HotTracking 属性
7.15 Indentation 属性
7.16 ItemHeight 属性（ActiveX 控件）
7.17 LabelEdit 属性
7.18 Left 属性（ActiveX 控件）
7.19 LineStyle 属性（TreeView 控件）
7.20 MaxNodeCount 属性（ActiveX 控件）
7.21 Nodes 属性
7.22 Object 属性（ActiveX 控件）
7.23 OleDragMode 属性（ActiveX 控件）
7.24 OleDropMode 属性（ActiveX 控件）
7.25 PathSeparator 属性（TreeView控件）
7.26 Parent 属性（Node 对象）
7.27 ScaleMode 属性（ActiveX 控件）
7.28 Scroll 属性
7.29 SelectedBackColor 属性（ActiveX 控件）
7.30 SelectedForeColor 属性（ActiveX 控件）
7.31 SelectedItem 属性（ActiveX 控件）
7.32 SelectedNoFocusBackColor 属性（ActiveX 控件）
7.33 SelectedNoFocusForeColor 属性（ActiveX 控件）
7.34 SingleSel 属性
7.35 Style 属性（TreeView 控件）
7.36 Tag 属性（ActiveX 控件）
7.37 TextColor 属性（ActiveX 控件）
7.38 ToolTips 属性（ActiveX 控件）
7.39 Top 属性（ActiveX 控件）
7.40 Visible 属性（ActiveX 控件）
7.41 Width 属性（ActiveX 控件）
8 Access扩展控件库--树控件常用方法
8.1 AboutBox 方法
8.2 AddImage 方法
8.3 AddImageGroup 方法
8.4 CollapseAllNode 方法
8.5 Create 方法
8.6 Echo 方法
8.7 ExpandAllNode 方法
8.8 GetVisibleCount 方法
8.9 HitTest 方法（ListView 和 TreeView 控件）
8.10 Move 方法
8.11 Refresh 方法
8.12 SetFocus 方法
9  Access扩展控件库--树控件常用事件
9.1 AfterLabelEdit 事件（ListView 和 TreeView 控件）
9.2 BeforeLabelEdit 事件（ListView 和 TreeView 控件）
9.3 Click 事件
9.4 Collapse 事件（TreeView 控件）
9.5 DblClick 事件
9.6 Expand 事件（TreeView 控件）
9.7 GotFocus 事件
9.8 KeyDown 事件
9.9 KeyPress 事件
9.10 KeyUp 事件
9.11 LostFocus 事件
9.12 MouseDown 事件
9.13 MouseMove 事件
9.14 MouseUp 事件
9.15 NodeCheck 事件
9.16 NodeClick 事件
9.17 OLECompleteDrag 事件
9.18 OLEDragDrop 事件
9.19 OLEDragOver 事件
9.20 OLEGiveFeedback 事件
9.21 OLESetData 事件
9.22 OLEStartDrag 事件
10 Access树控件注意问题
10.1 Access树控件（treeview) 64位Office下出现横向滚动条不会自动定位的解决办法
10.2 Access中国树控件 在win10电脑 节点行间距太小的解决办法

OLEDragDrop 事件

2017-07-13 15:29:56
zstmtony
4116
最后编辑：zstmtony 于 2017-07-13 15:39:04

OLEDragDrop事件

当源组件确定可能发生丢包时，将源组件下载到目标组件时发生。注意    仅当OLEDropMode设置为1（手动）时，才会发生此事件。


语法

Private Sub object_OLEDragDrop（data As DataObject，effect As Long，button As Integer，shift As Integer，x As Single，y As Single）

object_OLEDragDrop 事件的语法包含下面部分：

部分

描述

object

对象表达式，其值是 “应用于”列表中的一个对象。

data 

包含源将提供的格式的DataObject对象，另外还可能包含这些格式的数据。如果DataObject中没有数据，则在控件调用GetData方法时提供数据。该SetData的和清除方法不能用在这里。

effect 

由目标组件设置的长整型，标识已执行的操作（如果有），从而允许源在组件被移动时采取适当的操作（例如源删除数据）。可能的值列在“设置”中。

button 

当按下鼠标按钮的状态时，该整数用作位字段。左按钮为位0，右按钮为位1，中间按钮为位2.这些位分别对应于值1,2和4。它表示鼠标按钮的状态; 一些，全部，或这三个位都不能设置，表示某些，全部，或没有一个按钮被按下。

shift 

当按下SHIFT，CTRL和ALT键的状态时，它作为一个位字段起作用的整数。的SHIFT键为0位，所述CTRL键是位1，而ALT键是位2。这些位对应于值1，2，和4。的移位参数指示这些键的状态; 一些，全部或不能设置任何位，指示某些，全部或没有按键被按下。例如，如果CTRL和ALT键均被按下，则shift的值为6。

X，Y

指定鼠标指针当前位置的数字。的X和ÿ值总是在由规定的坐标系统来表示ScaleHeight，ScaleWidth，ScaleLeft和ScaleTop所述对象的特性。

 

effect 的设置是：

不变 值 描述
ccDropEffectNone 0 丢弃目标不能接受数据。
ccDropEffectCopy 1 删除导致从源到目标的数据副本。拖动操作不改变原始数据。
ccDropEffectMove 2 拖放导致数据从拖动源移动到丢弃源。拖动源应该在移动后从其自身中删除数据。
ccDropEffectScroll -2147483648 指示下拉目标窗口滚动/将滚动。


说明

源COM组件应始终从effect 参数中屏蔽值，以确保与COM组件的未来实现的兼容性。目前，effect 参数中只有32位中只有3位被使用。然而，在将来版本的Visual Basic中，可以使用这些其他位。因此，为了防止将来的问题，拖曳源和放置目标应在进行任何比较之前适当地屏蔽这些值。

例如，源组件不应将effect 与例如vbDropEffectCopy进行比较，例如：

如果Effect = mskDropEffectCopy ...

相反，源组件应该屏蔽正在寻找的值或值，如下所示：

如果Effect和mskDropEffectCopy = mskDropEffectCopy ...

要么

If（Effect And mskDropEffectCopy）...

这允许在将来版本的Visual Basic中定义新的拖放效果，同时保留与现有代码的向后兼容性。

大多数组件支持手动OLE拖放事件，有些支持自动OLE拖放事件。