1、首先新建记事本并且注意它的文件拓展名
2、其次打开记事本输入命令：
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""快叫我爸爸""
",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) + "好孩子，呵呵"
3、记住一定要按照我的格式隔开每一行（不然没用的）
4、接下来就是改变文件的拓展名通常的记事本拓展名应该是txt（文本文件）我们要将文件拓展名改变为vbs
5、具体怎么改呢：1 ：新建文件夹将你新建的记事本放进去
2 ：打开文件夹上方的工具 会看到一个 文件夹选项
3 ：点击进入
4 ：点击查看——会找到一个隐藏已知文件类型的拓展名
5 ：把方框中的钩去掉，点击确定
6、会发现在新建 文本文档.后面多了一个txt
接下来右击——重命名——把最后3个字母改为vbs
会出现一个可能导致文件不可用的对话框，不用去管他点击确定
接下来就完成啦
去整整你的朋友吧!
