按键精灵鼠标固定范围内随机移动的同时鼠标左键随机单击
比如,坐标随机在(左上角x0,左上角y0,右下角x1440,右下角y900坐标)内移动的同时,鼠标左键随机单击次数,请问脚本该如何编写...
比如,坐标随机在(左上角x0,左上角y0,右下角x1440,右下角y900坐标)内移动的同时,鼠标左键随机单击次数,请问脚本该如何编写
展开
3个回答
展开全部
Do
Call LClick(随机数(50,100), 随机数(70,20))
Delay 500
Loop
Function 随机数(数字1, 数字2)
Dim 数字3
Randomize
数字3 = 数字1
If 数字1 > 数字2 Then
数字3 = 数字2
End If
随机数= int(abs(数字1-数字2)*rnd)+数字3
End Function
Sub LClick(x, y)'鼠标左键点击
MoveR x, y
Delay 100
LeftClick 1
Delay 100
End Sub
程经理
2024-10-11 广告
2024-10-11 广告
作为硕方科技(北京)有限公司的工作人员,关于移动智能标签打印机P50A设置放标签自动的步骤,通常涉及以下几个关键操作:1. **安装标签带**:首先,确保标签带已正确安装于打印机内,标签带需竖直放入,并确保标签带内标签已拉直,碳带不松弛。2...
点击进入详情页
本回答由程经理提供
展开全部
123456789101112131415161718192021DoCall LClick(随机数(50,100), 随机数(70,20))Delay 500Loop Function 随机数(数字1, 数字2) Dim 数字3 Randomize 数字3 = 数字1 If 数字1 > 数字2 Then 数字3 = 数字2 End If 随机数= int(abs(数字1-数字2)*rnd)+数字3End FunctionSub LClick(x, y)'鼠标左键点击 MoveR x, y Delay 100 LeftClick 1 Delay 100End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
For 10
Randomize
x = Int((1440 * Rnd) + 1) //X轴
y = Int((900 * Rnd) + 1) //Y轴
L= Int((2 * Rnd) + 1) //点击次数
TracePrint x & ":" & y
MoveTo x, y
Delay 1000
LeftClick L
Next
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询