ThinkChat🤖让你学习和工作更高效,注册即送10W Token,即刻开启你的AI之旅 广告
## **描述** 在指定位置鼠标“右”键按下,但是不松开。可以指定相对于本窗口还是相对于屏幕,还可以指定点击的前后延时。 ## **语法** MouseRightDown(*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.MouseRightDown200, 200 '注意这个和ClickPoint的区别,这个只是鼠标右键按下但不弹起,执行后鼠标晃动会发现文本内容随着光标移动被选择了。这个一般是配合MouseRightUp使用,比如右键单击某个地方打开菜单。 End Sub ```