do loop 循环找数组图片第二轮的时候就提示:下标越界: 'I', _ 综合讨论

查看: 320\|回复: 2	[已解决] do loop 循环找数组图片第二轮的时候就提示:下标越界: 'I... [复制链接]

发送短消息 UID 9479576 帖子 7 精华 0 鲜花 12 朵铜币 26 个银币 16 个性别在线时间 0 注册时间 2025-08-08 最后登录 2025-10-07 查看公共资料搜索主题搜索帖子 asd300300 组别小学一年级 UID9479576 帖子7 精华0 鲜花12 朵铜币26 个银币16 个在线时间0 注册时间2025-08-08	1^# 字体大小: t T 发表于 2025-10-05 00:51 \| \|只看楼主首先自己是一个菜鸟一只喜欢用: picpath=array("","","","" ) do loop 这个组合去找多个图,只要找到一个图就去点击,可是遇到一个问题,页面不动第一次就能成功找到,页面被记事本挡住,然后移动开挡住的记事本,提示一直找不到图,请赐教一下. Call 测试() If x >0 Then TracePrint "恭喜找到的图片:"&picpath(i) End If Function 测试() picpath=array("第二次查询","第五次查询","回收站","计算机" ) i=0 Do FindPic 0, 0, 1920, 1080, "Attachment:\"&picpath(i)&".bmp", 1, x, y If x > 0 Then TracePrint "恭喜找到的图片为:"&picpath(i) 测试 = True Exit Function Else 测试 = False TracePrint "很遗憾没有找到的图片:"&picpath(i) Delay 1000 i=i+1 If i=10 Then TracePrint "第" & i & "次没找到图片退出循环" Exit Do End If End If Loop End Function
	点赞

	回顶部

发送短消息 UID 3773301 帖子 183 精华 0 鲜花 153 朵铜币 -7094 个银币 146 个性别在线时间 1280 注册时间 2016-02-23 最后登录 2025-10-08 592815248 查看公共资料搜索主题搜索帖子 yl321321 yl321321 组别初中一年级 UID3773301 帖子183 精华0 鲜花153 朵铜币-7094 个银币146 个在线时间1280 注册时间2016-02-23 按键精灵开发者2级可通过提升认证等级来升级勋章：rz.anjian.com	2^# 字体大小: t T 发表于 2025-10-05 12:21 \| \|只看该用户循环完I后，重新赋值I，或者判断I值重新赋值为0


	回顶部

瑞祥幽冥狼

按键工程师 ● 兼职

组别超级版主
UID1228894
帖子27035
精华25
鲜花8111 朵
铜币36189 个
银币4806 个
在线时间421340
注册时间2012-07-18

3^#

字体大小: t T

发表于 2025-10-07 09:30 | |只看该用户

首先自己是一个菜鸟一只喜欢用: picpath=array("","","","" ) do loop 这个组合去找多个图,只要找到一个图就去点击,可是遇到一个问题,页面不动第一次就能成功找到,页面被......
asd300300 发表于 2025/10/5 0:51:32

If 测试() >=0 Then'直接根据函数返回值进行判断
TracePrint "恭喜找到的图片:"&picpath(i)
End If
Function 测试()
picpath=array("第二次查询","第五次查询","回收站","计算机","1" )
测试 = False'开头声明False，找到等于true
For 10
TracePrint "============================="
For i=0 to UBound( picpath)'图片数组下标不能和次数i混用，i=10退出，图片只有4
FindPic 0, 0, 1920, 1080, "C:\"&picpath(i)&".bmp", 1, x, y'不要采用附件路径，存在BUG
If x > 0 Then
TracePrint "恭喜找到的图片为:"&picpath(i)
测试 = i'直接返回找到的下标
Exit Function
Else
TracePrint "很遗憾没有找到的图片:"&picpath(i)
End If
Delay 1000
Next
Next
TracePrint "第10次没找到图片退出循环"
End Function

收徒索引 ← ← ← ← ← ← ← ← ← ← 点击

个人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8［将满］
个人 Q Q 2 : 6 1 7 0 9 5 5 4 3［可加］

回顶部

上一主题| 下一主题

[已解决] do loop 循环找数组图片第二轮的时候就提示:下标越界: 'I... [复制链接]