中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-04 23:01
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » [VBS]求助Goto 运行错误?[已结]
可打印版本  1,456 / 10
第1楼 kich 发表于 2007-06-11 12:34
中级用户 发帖 168 积分 397
[VBS]求助Goto 运行错误?[已结]
不好意思,问这很简单的问题,但我不知道错在哪,指教下!!谢谢!!



提示说:第2行缺少语句,怎么了??

[ Last edited by kich on 2007-6-11 at 08:43 PM ]
第2楼 chenjide 发表于 2007-06-11 13:00
初级用户 发帖 13 积分 28
跳转符号没加上?

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

:EndThis
MsgBox "I am here"
第3楼 kich 发表于 2007-06-11 13:03
中级用户 发帖 168 积分 397
引号加到前面还是出错啊
第4楼 chenjide 发表于 2007-06-11 13:04
初级用户 发帖 13 积分 28
你的符号怎么在后面的~正确的是在前面~

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

最后根据命令就是这个:来寻找下一步跳转到那里
第5楼 chenjide 发表于 2007-06-11 13:05
初级用户 发帖 13 积分 28
还是你的整个代码有问题?

我不知道

我自己都是菜鸟呢 西西
第6楼 slore 发表于 2007-06-11 13:32
铂金会员 发帖 2,478 积分 5,212
VBS中唯一合法的GOTO语句是:On Error GoTo 0
第7楼 kich 发表于 2007-06-11 13:35
中级用户 发帖 168 积分 397
不是吧??那这个就GOTO不了吗??
那要是IF条件成立,后面的代码就不执行了,直接跳到一个地方继续往后执行,这样就实现不了吗??

[ Last edited by kich on 2007-6-11 at 01:36 PM ]
第8楼 kich 发表于 2007-06-11 18:04
中级用户 发帖 168 积分 397
自己解决了:
第9楼 slore 发表于 2007-06-11 18:20
铂金会员 发帖 2,478 积分 5,212
搞不懂你这个要do干什么你中间exit do?

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


要循环的话最好加个布尔变量...防止是循环退出了还执行它……
第10楼 slore 发表于 2007-06-11 18:21
铂金会员 发帖 2,478 积分 5,212
i = InputBox("输入")
Do
If i = 0 Then flag = True:Exit Do
MsgBox "正文"
Exit Do
Loop
If flag = True Then MsgBox "结束"
第11楼 kich 发表于 2007-06-11 20:41
中级用户 发帖 168 积分 397
其实我代码全不帖出来很麻烦,因为中间会有很多IF,有时在加在中间,这样不要办!!所以我想用GOTO好点,无奈没有!!
所以,好象记得slore兄以前在别人的回帖上发了用Do Loop设置退出!所以我想这个可以试了就可以了!
因为不好把原代码帖上来,只好随便写了脚本,目的是想阐述我的Goto用法的意图!
不是想怎么简化这语句!
后来还是通过Do...Loop解决了!!
不过依然很谢谢楼上的各位!尤其是slore兄!看了您很多回复了!!
致敬!!
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023