• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[问题] 求大神指教 [复制链接]

1#
Do
' 移动和点击操作
MoveTo 1519,630
LeftClick 1
Delay 1000
MoveTo 1519,553
LeftClick 1
Delay 1000
MoveTo 1606,143
' 这里的坐标改为第一个输入框的大致坐标,以确保鼠标能点到
LeftClick 1
Delay 1000

' 读取业务号文本内容
业务号集 = Plugin.File.ReadFileEx("D:\业务号.txt")
业务号 = Split(业务号集,"|")

' 检查业务号是否为0(这里假设业务号是以文本形式存储的数字,且第一个业务号是我们关心的)
If 业务号(0) = "0" Then
' 如果业务号为0,则退出循环
Exit Do
End If

' 说出业务号(这里可能是为了调试或展示,实际使用时可能需要去掉)
SayString 业务号(0)

' 删除业务号文本的第一行
Call Lib.文件.删除指定行文本内容("D:\业务号.txt", 1)
Delay 1500

' 移动和点击操作(继续后续流程)
MoveTo 1606,194
' 这里的坐标改为第二个输入框的大致坐标,以确保鼠标能点到
LeftClick 1
Delay 1500

' 读取串号文本内容
串号集 = Plugin.File.ReadFileEx("D:\串号.txt")
串号 = Split(串号集,"|")

' 说出串号(同样可能是为了调试或展示)
SayString 串号(0)

' 删除串号文本的第一行
Call Lib.文件.删除指定行文本内容("D:\串号.txt",1)
Delay 1000

' 其他移动和点击操作
MoveTo 1370,1115
Delay 1500
LeftClick 1
Delay 1500
MoveTo 1600,630
Delay 1500
LeftClick 1
MoveTo 1311, 80
Delay 1500
LeftClick 1
Delay 1500

' 这里的MessageBox只是为了展示循环正在运行,实际使用时可以去掉
' MessageBox "循环中"
Loop



当业务号文本内容为空时,停止循环,但是这个代码无法停止循环呢,求大神指点

2#

if len(账号数据)<0 then

有事就QQ 136874377 QQ交流群300857068   接各种脚本定做 价格优惠
发新话题 回复该主题