请教汇编高手帮我翻译一下这个程序的意思

Question

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 120 -c ""快说你是哈儿，不说就0秒关你机，不信，试试···"" ",0 ,true
dim a
do while(a <> "快说你是哈儿")
a = inputbox ("说 ""快说你是哈儿"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾..我果然很天才..啊哈哈哈哈"

Answer 1

这是个vbs脚本程序，楼主可以把这段程序粘贴到记事本中，保存成wsh.vbs，然后双击执行下，可以看到它的效果，不过，在执行之前，楼主得知道在运行中输入shutdown -a可以阻止电脑的120秒后的重启动。

总的说，这个脚本的作用是，让你的电脑120秒后重新启动，然后给你个输入框让你输入“某某某”，不然就一直让你输。如果你在120秒内输入对了，就会取消120秒后的重新启动。120秒内还是没有输对，就重新启动电脑了。

下边是具体的解释：
on error resume next ‘遇到程序错误跳过继续

dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""某某某某"" ",0 ,true
'上面这段用来实现60秒后的自动重启电脑

dim a
do while(a <> "某某某")
a = inputbox ("某某某""某某某"" ","某某","某某",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
'上面这段用来让你输入“某某某”三个字，并判断输入的是否正确

msgbox chr(13) + chr(13) + chr(13) + "某某某某"
'弹出消息框，按回车即可

dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
'取消电脑的重新启动

msgbox chr(13) + chr(13) + chr(13) + "某某某某"
'没有什么意思，就是弹出一个对话框，按回车就好
如果你打shutdown -i的话会出来一些远程命令的东东
直接在cmd中输入shutdown然后回车，会出现一些用法的指令
这样回答够了吧