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

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

按键精灵安卓版
立即下载

软件版本:4.0.2
软件大小:45M
更新时间:2025-07-01

按键精灵iOS版
立即下载

软件版本:2.3.3
软件大小:29.2M
更新时间:2025-07-01

按键手机助手
立即下载

软件版本:4.3.0
软件大小:242M
更新时间:2025-07-01

快捷导航

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

返回列表 «6566676869707172» / 121
发新话题 回复该主题

[技术交流] 【院刊】-【201507期】安卓实战——让脚本适应多种分辨率 [复制链接]

1361#

11111

1362#

好好学习 天天向上

1363#

seesee

1364#

怎么又要回复

1365#

期】安卓实战——让脚本适

1366#

谢谢分享 支持支持

1367#

aaaaaaaaaaaaaaaaaaaaa

1368#

扣扣

1369#

xue学习啦,谢谢啊,

1370#

看看代码,感谢分享

1371#

過目下 大神的作品 謝謝

1372#

学习学习

1373#

顶顶顶顶顶达到

1374#

Dim path1 = "/sdcard/账号.txt"
Dim path2 = "/sdcard/记录.txt"
Dim 账号,密码,行

Do
'先读取当前需要登录第几行账号
行 = File.Read(path2)
'读取账号、密码
Call 读取账号(path1,cint(行))
Call 登录账号()
'登录成功之后行数加1,再次登录时就会自动读取下一个账号
Call File.Write(path2, CInt(行) + 1)
'执行游戏中的功能
Call 执行任务()
Loop

Function 读取账号(账号路径,行)
Dim arr(),text()
arr = File.ReadLines(账号路径)
text = Split(arr(行), "|")
账号 = text(0)
密码 = text(1)
End Function

1375#

这个必须得学习,才可以的。

1376#

感谢

1377#

还是需要回复

1378#

分辨率学习

1379#


RE:【院刊】-【201507期】安卓实战——让脚本适应多种分辨率

1380#

谢谢楼主的分享

发新话题 回复该主题