======================================================================a=Inputbox ("请输入密码","输入密码") '要求用户输入密码if a=888 then '如果输入的密码是：888 msgbox "密码正确，欢迎使用" '弹出窗口“ 密码正确，欢迎使用”goto 88 '跳到标记 88处再执行else '否则msgbox "密码错误" '弹出窗口 "密码错误"end '结束该脚本end if '结束假设88: '标记88msgbox "a" '弹出窗口 "a"==============================================================可是在执行的时候发生错误谁能告诉我发生了什么问题？

首先，vbs里的goto语句仅仅在err对象里可以用，不能这样使用其次，end怎么能结束脚本？wscript.quit可以退出脚本最后，如果你认为把msgbox "a" 写在if语句里很难受，可以写成函数调用呀。正确代码自己修改吧，不难的。

函数调用?

不管怎样,你都帮了我,谢谢

我不是不想写，而是让你自己写如果真的想让我写 请留言

我只想知道函数调用是什么 ?能写个例子说明函数调用是什么吗?谢谢

sub a()wscript.echo "test"end sub'------------------------------------a'即可调用a

晕！~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~vbs中没有goto的用法

Dim a a =InputBox ("请输入密码","输入密码")Call pass(a) '调用函数Function pass(str) '自定义函数If str ="888" ThenMsgBox "密码正确，欢迎使用"Call b '调用过程ElseMsgBox "密码错误"End If End FunctionSub b '自定义过程MsgBox "a"End sub

不是没有，而是只能用在error上！计算机语言这东西就这样，各有各的特色，优缺点，cmd简洁，goto用着很方便，但处理数字和文本却很麻烦，vbs处理文本功能很强悍，但循环中却没continue，breakjavascript处理数字很牛，不过有时绝得麻烦的很

所以要结合！最重要的是传递变量。

我也非常喜欢结合起来

if a=888 then这句错了呀! 应该是if a="888" then引号一定要记得加上!编程人一定要细心!

fix()上去

弄个eval(a)=888也行