按键精灵,下标越界,和保存帐号行数问题,求助。
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 展开
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 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询