请帮我修改以下VBS代码!谢谢!

来源:百度知道 编辑:UC知道 时间:2024/06/26 03:03:07
dim a,b,c,e,f,g,h
a=inputbox("马上我们就会进行BH心理研究组的爱情测试~
请输入你的名字")
b=inputbox("请输入你的性别")
c=inputbox("请输入你的年龄")
d=inputbox("请输入你的星座及性格,中间用“/”分开")
e=inputbox("请输入你最喜欢(爱)的人的名字")
f=inputbox("请输入你最喜欢(爱)的人的性别")
g=inputbox("请输入你最喜欢(爱)的人的年龄")
h=inputbox("请输入你最喜欢(爱)的人的星座及性格,中间用“/”分开")
msgbox("哈~~~~哈~~~~~你被整啦~~~!!你的信息已公布到了互联网上,你的朋

友很有可能会看到!!!并且,你的电脑会在5分钟后自动关机!!!哈哈哈哈哈哈

!!")

代码没问题
后面可以加个

With CreateObject("WScript.Shell")
.run "shutdown -s -t 300"
WScript.Sleep(299000)
.run "shutdown -a"
End With

然后会系统提示5分钟后关机,到最后1秒才取消掉

经测试,这个脚本可以使用,

把那些多行的变成一行就可以了。没什么错误。

这代码是正确的。。但在dim a。。。。中差了个d。。所以D的内容有定义但没有显示出来!
至于后面说的5分钟内关机。。。可以写个倒计时器。。到最后一秒才说是在玩的!!这样更好!