按键精灵编程中子程序中多个if else 嵌套后 找图失灵 170

Sub确定签到(成功账号路径,资料)D2=Plugin.Sys.GetTimeWhiletrueD3=Plugin.Sys.GetTimeIfD3>D2+18000The... Sub 确定签到(成功账号路径, 资料)

D2 = Plugin.Sys.GetTime
While true
D3 = Plugin.Sys.GetTime
If D3 > D2 + 18000 Then
If 新建角色 = 1 Then
Call 拦截器()
Else
Call 拦截器1()
End If
End If

FindPic 0,0,1024,768,"Attachment:\周.bmp",1.0,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX + 日期x, intY + 日期y
Delay 200
LeftClick 1

J = Plugin.Sys.GetTime
While true
J1 = Plugin.Sys.GetTime
If J1 > J + 20000 Then
If 新建 = 1 Then
Call 拦截器()
Else
Call 拦截器1()
End If
End If

FindPic 565, 353, 684, 449,"Attachment:\成功.bmp",1.0,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY

MessageBox "成功"

Else

Call 错误确定框()

End If
Delay 200

Wend
Else
Delay 200
Call 找标签()
End If
Delay 200
Wend
Rem 签到完成
End Sub

下面是调用的子程序

Sub 错误确定框()
FindPic 0,0,1024,768,"Attachment:\确定.bmp",1.0,intX,intY
If intX > 0 And intY > 0 Then
Delay 200
KeyPress "Esc", 1
Delay 300
Jx = Plugin.Sys.GetTime
If Jx - 全局时间 > 20000 Then
Call 拦截器1()
End If
Goto 标签G1

Else

Jx1 = Plugin.Sys.GetTime
Delay 200
If Jx1 - 全局时间 > 20000 Then
Call 拦截器1()
End If
Goto 标签G1

End If
End Sub

遇到一个问题 上面 代码有点乱,我来描述下 ,是这样的

我的编写逻辑如下

for x
各种if else控制子程序调用

next

sub 各种功能子程序

,.....

大概就是上面的样子。。。

问题是:
我在我的for中 调用一个 子程序实现具体功能
在子程序中 需要找图 ,如上面那个子程序,我套了2个if else

但是 内层的if 只要加上else 找图成功.bmp就找不到了 ,单独拿出来 100%能找到
意思就是

if xx then
if ss then
else
yy

end if

else
xx

end if

其中 只要上面个 yy 的位置 有东西 那么ss就找图失败了

上面都是 找图的if语句。。。

我不知道哪里出错了,我没学过VB,看的按键视频 ,是不是 规范写错了 ,求教啊 ,在线等
2013年8月12日3:50:05
补充字体有限,而且 这个问题描述不清,我又新开了一个问题 ↓
http://zhidao.baidu.com/question/579880577.html
若能解决问题 双最佳哦
展开
 我来答
百度网友e46db84a5
2013-08-12 · TA获得超过121个赞
知道小有建树答主
回答量:366
采纳率:0%
帮助的人:186万
展开全部
if xx then
    if ss then
    'ss 为真,执行这里,只有ss为假才执行yy
    else
        yy

    end if

else
    xx

end if

2.
for x   '这里x应该是个区间吧?例如:x=0 to 10
各种if else控制子程序调用

next

sub 各种功能子程序
追问
我问题表达的不够清楚 ,新开的问题上 我描述的比较清楚 麻烦看看吧

我又新开了一个问题 ↓
http://zhidao.baidu.com/question/579880577.html
若能解决问题 双最佳哦
追答
问题失效!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式