|
kich
中级用户
积分 397
发帖 168
注册 2006-10-8
状态 离线
|
『楼 主』:
[VBS]求助Goto 运行错误?[已结]
不好意思,问这很简单的问题,但我不知道错在哪,指教下!!谢谢!!
i =0
If i = 0 Then GoTo EndThis
MsgBox "Hey You"
EndThis:
MsgBox "I am here" 提示说:第2行缺少语句,怎么了??
[ Last edited by kich on 2007-6-11 at 08:43 PM ]
|
|
2007-6-11 12:34 |
|
|
chenjide
初级用户
积分 28
发帖 13
注册 2007-1-27
状态 离线
|
『第
2 楼』:
跳转符号没加上?
i =0
If i = 0 Then GoTo EndThis
MsgBox "Hey You"
:EndThis
MsgBox "I am here"
|
|
2007-6-11 13:00 |
|
|
kich
中级用户
积分 397
发帖 168
注册 2006-10-8
状态 离线
|
|
2007-6-11 13:03 |
|
|
chenjide
初级用户
积分 28
发帖 13
注册 2007-1-27
状态 离线
|
『第
4 楼』:
你的符号怎么在后面的~正确的是在前面~
GOTO 会自动遍历以“:”冒号开头的标签
最后根据命令就是这个:来寻找下一步跳转到那里
|
|
2007-6-11 13:04 |
|
|
chenjide
初级用户
积分 28
发帖 13
注册 2007-1-27
状态 离线
|
『第
5 楼』:
还是你的整个代码有问题?
我不知道
我自己都是菜鸟呢 西西
|
|
2007-6-11 13:05 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
6 楼』:
VBS中唯一合法的GOTO语句是:On Error GoTo 0
|
|
2007-6-11 13:32 |
|
|
kich
中级用户
积分 397
发帖 168
注册 2006-10-8
状态 离线
|
『第
7 楼』:
不是吧??那这个就GOTO不了吗??
那要是IF条件成立,后面的代码就不执行了,直接跳到一个地方继续往后执行,这样就实现不了吗??
[ Last edited by kich on 2007-6-11 at 01:36 PM ]
|
|
2007-6-11 13:35 |
|
|
kich
中级用户
积分 397
发帖 168
注册 2006-10-8
状态 离线
|
『第
8 楼』:
自己解决了:
i =inputbox("输入")
do
If i = 0 Then exit do
MsgBox "正文"
exit do
loop
MsgBox "结束"
|
|
2007-6-11 18:04 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
9 楼』:
搞不懂你这个要do干什么你中间exit do?
i = InputBox("输入")
If i = 0 Then
MsgBox "结束"
Else
MsgBox "正文"
End If
要循环的话最好加个布尔变量...防止是循环退出了还执行它……
|
|
2007-6-11 18:20 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
10 楼』:
i = InputBox("输入")
Do
If i = 0 Then flag = True:Exit Do
MsgBox "正文"
Exit Do
Loop
If flag = True Then MsgBox "结束"
|
|
2007-6-11 18:21 |
|
|
kich
中级用户
积分 397
发帖 168
注册 2006-10-8
状态 离线
|
『第
11 楼』:
其实我代码全不帖出来很麻烦,因为中间会有很多IF,有时在加在中间,这样不要办!!所以我想用GOTO好点,无奈没有!!
所以,好象记得slore兄以前在别人的回帖上发了用Do Loop设置退出!所以我想这个可以试了就可以了!
因为不好把原代码帖上来,只好随便写了脚本,目的是想阐述我的Goto用法的意图!
不是想怎么简化这语句!
后来还是通过Do...Loop解决了!!
不过依然很谢谢楼上的各位!尤其是slore兄!看了您很多回复了!!
致敬!!
|
|
2007-6-11 20:41 |
|