我写的代码如下
dim a,s
set a=wscript.createobject("wscript.shell")
s=inputbox("请输入‘我是猪’")
if s=我是猪 then
msgbox("真乖，不过你太乖了，所以拜拜了")
a.run"shutdown -a" （因为我试过用a关闭进程a会直接卡住）
else then
magbox("不对，再试试？")
end if
dim b
b=inputbox("快说我是猪")
if b=我是猪 then
msgbox("真乖")
else then
msgbox("不乖！")
a.run"shutdown -a"
end if
程序中有多个错，看上去你根本不懂编程。有着这么去抄别人无聊的程序，不如认真学习下真正的编程
以下是修改好的可以运行的程序 ，但不能关机的呵，因为你连关机命令都是错的（我就不改了）
dim a,s
set a=wscript.createobject("wscript.shell")
s=inputbox("请输入‘我是猪’")
if s="我是猪" then
msgbox ("真乖，不过你太乖了，所以拜拜了")
a.run "shutdown -a"
else
msgbox("不对，再试试？")
end if
dim b
b=inputbox("快说我是猪")
if b="我是猪" then
msgbox("真乖")
else
msgbox("不乖！")
a.run "shutdown -a"
end if
