整蛊朋友的有趣代码

注意！这是用JavaScript编写，编码格式改为ANSI，后缀名改成VBS！

1. 假病毒

x=msgbox("你的电脑出现了一个病毒，你想修复它吗？",3+16,"此电脑")
x=msgbox("修复失败",3+16,"此电脑")
x=msgbox("是否扫描此电脑",4+32,"Windows Defender")
x=msgbox("正在扫描中……",2+62,"Windows Defender")
x=msgbox("发现已知病毒，是否清除",1+16,"Windows Defender")
x=msgbox("无法清除此病毒",1+16,"Windows Defender")
x=msgbox("正在获取你的QQ及所有文件和浏览记录至云端",2+64,"Virus")
x=msgbox("无法终止病毒进程",0+32,"System")
x=msgbox("无法终止此操作",0+16,"Virus")
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c""cd C:/&&cd windows&&cd system32&&dir",4,ture
x=msgbox("删除系统文件中",0+16,"Virus")
x=msgbox("你的计算机将在十秒后重启",0+16,"Virus")

2.电脑“自爆”

x=msgbox("电脑即将自爆，是否终止？",2+16,"系统自爆提醒")
x=msgbox("无法终止自爆进程",3+16,"系统自爆提醒")
x=msgbox("电脑即将自爆，请在15秒内离开座位，否则您可能死亡！",3+16,"系统自爆提醒")
CreateObject("SAPI.SpVoice").Speak "电脑即将自爆，请在15秒内离开座位，否则您可能死亡！"

3.给我按10000次回车！！！

for i = 0 to 10000 '此处100可改成其他数'
msgbox"回车[滑稽]",64
next