多应用+插件架构,代码干净,二开方便,首家独创一键云编译技术,文档视频完善,免费商用码云13.8K 广告
## **描述** 在指定位置鼠标“左”键按下,但是不松开。可以指定相对于本窗口还是相对于屏幕,还可以指定点击的前后延时。 ## **语法** MouseLeftDown(*x1, y1[, PositionMod = relative[, delayMilliSecondsBefore = 0[, delayMilliSecondsAfter = 0]]]*) **该语法中有下列命名参数:** | 参数 | 描述 | | --- | --- | | x1 | Long类型,表示要点击的Left坐标值。 | | y2 | Long类型,表示要点击的Top坐标值。 | | PositionMod | 可选的。enumPositionMode 类型,表示坐标使用绝对还是相对方式。如果忽略,**缺省值是relative,它表明坐标使用相对方式**,例如点击100,100这个点,默认会点击相对于窗口左顶点的位置100,100,如果要相对于屏幕可以设置本参数值为absolute。关于enumWindowVisible类型的介绍请参考下面“**enumPositionMode类型的设置值**”表的介绍。| | delayMilliSecondsBefore | 可选的。Long 类型,**表示点击前延时多久**,单位为毫秒(ms)。如果忽略,缺省值是 0,它表明点击前不延时。| | delayMilliSecondsAfter | 可选的。Long 类型,**表示点击后延时多久**,单位为毫秒(ms)。如果忽略,缺省值是 0,它表明点击后不延时。| **enumPositionMode类型的设置值:** | 设置 | 描述 | | --- | --- | | absolute | 坐标使用绝对方式 | | relative | 坐标使用相对方式 | ## **返回值** | 无 | | --- | | - | ## **示例** > 说明:请向窗口添加按钮Command1,然后复制下面代码后点击按钮运行。运行前先打开记事本,记事本里至少要有10行以上内容。 ``` Private Sub Command1_Click() Dim w As New clsWindow w.GetWindowByClassName "Notepad" '获得记事本窗口 w.Wait 500 w.Focus '设置记事本窗口为活动窗口 w.Wait 500 w.MouseLeftDown 200, 200 '注意这个和ClickPoint的区别,这个只是鼠标左键按下但不弹起,这个一般是配合MouseUp使用,比如点击某个目标。 End Sub ```