VBS 代码2

直接关机：
dim WSHshell
set WSHshell = wscript.createobject(\\\"wscript.shell\\\")
WSHshell.run \\\"shutdown -f -s -t 00\\\",0 ,true
不断按下alt+f4：打开任何程序都关掉
dim WSHshell
set WSHshell = wscript.createobject(\\\"wscript.shell\\\")
do
wscript.sleep 2500
WSHshel1.SendKeys \\\"%{F4}\\\"
1oop
电脑说话
set objTTS = createobject(\\\"sapi.spvoice\\\")objTTS.speak “我自横刀向天笑，笑完我就去睡觉”无限弹出窗口
while(1)
msgbox（\\\"关不掉我吧\\\")
msgbox(“哈哈，还是关不掉我“）msgbox（\\\"你就是关不掉我\\\"）
msgbox（“大爆发，我就是这么强大\\\"）msgbox（\\\"关不掉我吧\\\")
msgbox(\\\"啦啦啦\\\")
msgbox（\\\"你拿我没办法“）msgbox(\\\"哈哈哈\\\")
msgbox（\\\"气死你，哈哈哈哈\\\")
Wend无限弹出窗口
while(1)
msgbox（\\\"关不掉我吧\\\")
msgbox(“哈哈，还是关不掉我“）msgbox（\\\"你就是关不掉我\\\"）
msgbox（“大爆发，我就是这么强大\\\"）msgbox（\\\"关不掉我吧\\\")
msgbox(\\\"啦啦啦\\\")
msgbox（\\\"你拿我没办法“）msgbox(\\\"哈哈哈\\\")
msgbox（\\\"气死你，哈哈哈哈\\\")
Wend

有空一起交流一下

求沙发