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

MouseMove 事件

2017-07-12 17:46:25
zstmtony
3818
最后编辑：zstmtony 于 2017-07-13 16:02:33

MouseMove事件

当用户移动鼠标时发生。


语法

Private Sub Form_MouseMove（button As Integer，shift As Integer，x As Single，y As Single）

Private Sub MDIForm_MouseMove（button As Integer，shift As Integer，x As Single，y As Single）

Private Sub Object_MouseMove（ [ index As Integer，]）button As Integer，shift as Integer，x as Single，y as Single）



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

部分

描述

object

对象表达式，其值是 “应用于”列表中的一个对象。
shift 
 一个整数，唯一标识一个控件，如果它在一个控制数组。

button 

对应于鼠标按钮的状态的整数，其中如果按钮被关闭，则设置位。所述按钮参数是与对应于左按钮（位0）的位，右按钮（第1位），和中间按钮（第2位）的比特字段。这些位分别对应于值1,2和4。它表示鼠标按钮的完整状态; 一些，全部，或这三个位都不能设置，表示某些，全部，或没有一个按钮被按下。

shift 

与SHIFT，CTRL和ALT键的状态相对应的整数。如果键已关闭，则置位。的shift参数是与对应于SHIFT键的至少-显著位（位0），CTRL键（第1位），以及ALT键（第2位）的比特字段。这些位分别对应于值1,2和4。的shift参数指示这些键的状态。可以设置一些，全部或任何位，表示某些，全部，或没有一个按键被按下。例如，如果按住CTRL和ALT，则shift的值为6。

x，y

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

 

说明

当鼠标指针移动到对象上时，MouseMove事件会不断生成。除非另一个对象捕获了鼠标，否则只要鼠标位置在其边框内，对象即可识别MouseMove事件。

如果需要测试button或shift参数，可以使用对象浏览器中Visual Basic（VB）对象库中列出的常量定义参数中的位：

常数（按钮） 值 描述
vbLeftButton 1 左按钮被按下。
vbRightButton 2 右按钮。
vbMiddleButton 4 中间按钮被按下。
常数（Shift） 值 描述
vbShiftMask 1 按SHIFT键。
vbCtrlMask 2 按住CTRL键。
vbAltMask 4 ALT键被按下。

然后，常数作为位掩码，可用于测试任意组合的按钮，而无需确定每个组合的唯一位字段值。

您通过首先将每个结果分配给一个临时整数变量，然后将button或shift参数与位掩码进行比较来测试条件。使用每个参数的And运算符来测试条件是否大于零，表示按下了按钮或按钮，如下例所示：

LeftDown =（Button And vbLeftButton）> 0
CtrlDown =（Shift和vbCtrlMask）> 0

然后，在一个过程中，您可以测试任何条件的组合，如本例所示：

如果LeftDown和CtrlDown然后

注意    您可以使用MouseDown和MouseUp事件过程来响应按下并释放鼠标按钮导致的事件。

该button为的MouseMove参数不同于button为的MouseDown和MouseUp参数。对于MouseMove，button参数表示所有按钮的当前状态; 单个MouseMove事件可以指示按下一些全部或全部按钮。对于MouseDown和MouseUp，button参数每个事件只显示一个按钮。

任何时候在MouseMove事件中移动窗口，都可能导致级联事件。当窗口移动到指针下方时，会生成MouseMove事件。即使鼠标完全静止，也可以生成MouseMove事件。