💎一站式轻松地调用各大LLM模型接口,支持GPT4、智谱、豆包、星火、月之暗面及文生图、文生视频 广告
## **描述** 鼠标“左”键松开。 ## **语法** MouseLeftUp([delayMilliSecondsBefore = 0[, delayMilliSecondsAfter = 0]]*) **该语法中有下列命名参数:** | 参数 | 描述 | | --- | --- | | 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 100, 100 '在坐标(100,100)处按下 w.SetCursor 200, 200, relative '移动鼠标到(200,200) w.MouseLeftUp '抬起鼠标,你会看到内容被选择了 End Sub ``` 以下内容是程序自动选择的: ![](https://img.kancloud.cn/ff/92/ff926c55797a3b3dda7e2e562b1b54ae_1300x588.png)