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电脑 节点行间距太小的解决办法

OLEDragOver 事件

2017-07-12 17:47:20
zstmtony
3297
最后编辑：zstmtony 于 2017-07-13 15:30:02

OLEDragOver事件

当一个组件被拖动到另一个组件时发生。

语法

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


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

部分

描述

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）和垂直（y）位置。的X和ÿ值总是在由规定的坐标系统来表示ScaleHeight，ScaleWidth，ScaleLeft和ScaleTop所述对象的特性。

state

一个对应于控件相对于目标形式或控件拖动的过渡状态的整数。可能的值列在“设置”中。


effect 的设置是：

不变 值 描述
cc DropEffectNone 0 丢弃目标不能接受数据。
ccDropEffectCopy 1 删除导致从源到目标的数据副本。拖动操作不改变原始数据。
cc DropEffectMove 2 拖放导致数据从拖动源移动到丢弃源。拖动源应该在移动后从其自身中删除数据。
cc DropEffectScroll -2147483648

（＆H80000000）

 滚动正在目标组件中发生或即将发生。该值与其他值一起使用。
注意    仅当您在目标组件中执行自己的滚动时才使用。

state的设置是：

不变 值 描述
ccEnter 0 源组件正在目标范围内拖动。
ccLeave 1 源组件被拖出目标范围。
ccOver 2 源组件已从目标中的一个位置移动到另一个位置。



说明

注意    如果state参数为vbLeave，表示鼠标指针已经离开目标，则x和y参数将包含零。

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

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

如果Effect = mskDropEffectCopy ...

相反，源组件应掩盖正在寻找的值或值，如下所示：

如果Effect和mskDropEffectCopy = mskDropEffectCopy ...

要么

If（Effect And mskDropEffectCopy）...

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

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