按键精灵,下标越界,和保存帐号行数问题,求助。

dm_ret=dm.FindStr(616,572,662,597,"登录","ffffff-000000",1.0,intX,intY)IfintX>=0andintY... dm_ret = dm.FindStr(616,572,662,597,"登录","ffffff-000000",1.0,intX,intY)
If intX >= 0 and intY >= 0 Then
Text = Plugin.File.ReadFileEx("Z:\D\zzz.txt")
arr1 = split(Text, "|")
TracePrint arr1(i)
arr2 = split(arr1(i), "----")
TracePrint arr2(0)
TracePrint arr2(1)
TracePrint arr2(2) 这里读取arr2(2)不是完成,就显示下标越界,如何解决
If arr2(2) = "完成" Then 这里读取arr2(2)不是完成,就显示下标越界,如何解决
TracePrint "arr2(2) =1 "
i = i + 1
Delay 200
Goto kaikk
Else
zhanghao = arr2(0)
mimi = arr2(1)
TracePrint zhanghao
TracePrint mimi
zhanghaomulu="Z:\D\zzz.txt"
MyArray = Split(Plugin.File.ReadFileEx(zhanghaomulu), "|")
Call Lib.文件.替换指定行文本内容(zhanghaomulu, zhanghao & "----" & mimi & "----" & "完成", i + 1) 为什么读取i是2,却保存到1上呢? 我给i+1就可以完成保存、但我后面还得i-1
Delay 222
i = i - 1
Delay 222
Goto kaikk
End If
End If
If arr2(2) = "完成" Then 这里读取arr2(2)不是完成,就显示下标越界,如何解决
Call Lib.文件.替换指定行文本内容(zhanghaomulu, zhanghao & "----" & mimi & "----" & "完成", i + 1) 为什么读取i是2,却保存到1上呢? 我给i+1就可以完成保存、但我后面还得i-1
展开
 我来答
btood
2017-08-19 · 知道合伙人软件行家
btood
知道合伙人软件行家
采纳数:754 获赞数:2108

向TA提问 私信TA
展开全部
按键精灵数组是从0位开始,比如arr(0)
定义一个数组dim a(2),其实有3个元素
Dim a(2)
TracePrint a(0)
TracePrint a(1)
TracePrint a(2)
TracePrint a(3)
会发现 0,1,2,都是可以的,3就提示下标越界了,仔细检查一下是否是下标问题
追问
谢谢 是文本没有a(2)的分界线 ----  解决了 谢谢
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式