中国DOS联盟

不好意思,问这很简单的问题,但我不知道错在哪,指教下!!谢谢!!

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 ]

跳转符号没加上？

i =0
If i = 0 Then GoTo EndThis
MsgBox "Hey You"

：EndThis
MsgBox "I am here"

引号加到前面还是出错啊

你的符号怎么在后面的~正确的是在前面~

GOTO 会自动遍历以“：”冒号开头的标签

最后根据命令就是这个：来寻找下一步跳转到那里

还是你的整个代码有问题？

我不知道

我自己都是菜鸟呢 西西

VBS中唯一合法的GOTO语句是:On Error GoTo 0

不是吧??那这个就GOTO不了吗??
那要是IF条件成立,后面的代码就不执行了,直接跳到一个地方继续往后执行,这样就实现不了吗??

[ Last edited by kich on 2007-6-11 at 01:36 PM ]

自己解决了:

i =inputbox("输入")

do 

If i = 0 Then exit do

MsgBox "正文"

exit do

loop

MsgBox "结束"

搞不懂你这个要do干什么你中间exit do？

i = InputBox("输入")
If i = 0 Then
MsgBox "结束"
Else
MsgBox "正文"
End If


要循环的话最好加个布尔变量...防止是循环退出了还执行它……

i = InputBox("输入")
Do
If i = 0 Then flag = True:Exit Do
MsgBox "正文"
Exit Do
Loop
If flag = True Then MsgBox "结束"

其实我代码全不帖出来很麻烦,因为中间会有很多IF,有时在加在中间,这样不要办!!所以我想用GOTO好点,无奈没有!!
所以,好象记得slore兄以前在别人的回帖上发了用Do Loop设置退出!所以我想这个可以试了就可以了!
因为不好把原代码帖上来,只好随便写了脚本,目的是想阐述我的Goto用法的意图!
不是想怎么简化这语句!
后来还是通过Do...Loop解决了!!
不过依然很谢谢楼上的各位!尤其是slore兄!看了您很多回复了!!
致敬!!