Question

这都是些什么意思

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 15 -c ""XXXXXX"" ",0 ,true
dim a
do while(a <> "XXXX")
a = inputbox ("XXXXXXXXX，X ""XXXX""　","XXX","XX",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "XXXX"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "XXXXXX"

我也经常改这害别人
但是我不知道每句代码是什么意思，一段一段的告诉我下

Answer 1

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

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

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

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

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

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

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

msgbox chr(13) + chr(13) + chr(13) + "XXXXXX"
'没有什么意思，就是弹出一个对话框，按回车就好

Answer 2

Answer 3

这是一个VBS脚本，拥有执行任何程序的能力，只要你双击运行，你也就给予它你的权限了！
运行的过程是这样的，它利用wscript.shell的函数调用运行程序CMD，打开了DOS，并输入了定时关机的命令和一些关机提示消息，此时你的屏幕会出现一个关机倒计时。而后又创建一些垃圾对话窗口，最后又利用DOS命令取消了关机任务。就是这样

其中定义了一个判断语句：dim a 定义一个变量a，当a不等于“XXXXXX”这个字符时，就不断循环出现下面的“xx的对话框，当输入值为“xxx”时，跳出循环。输出 XXXXXX