代码大全可复制免费搞笑（恶搞的代码）
3、恶搞程序代码
求一些好玩的整人代码~~
gsh=msgbox ("已经准备好格式化，准备开始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "开始格式化…… 哈哈！吓晕了吧，骗你的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows发现一重要更新，将自动下载。"
wscript.sleep 3000
msgbox "系统检测到WINDOWS更新中捆绑有不明插件SXS.exe,是否对其扫描？",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"发行者 田间的菜鸟 "+chr(13)+"安全评级 高危"+chr(13)+"建议 直接删除"+chr(13)+"病毒类型：木马",,"windows扫描附件"
msgbox "是否阻止其安装？",vbyesno
wscript.sleep 3000
msgbox "阻止失败！请检查防火墙是否开启！"
wscript.sleep 5000
msgbox "正在尝试强行删除…"
wscript.sleep 5000
msgbox "失败！"
wscript.sleep 5000
msgbox "您的电脑已陷入危险之中，请赶快扫描病毒！"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im *** .exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "你好啊！"
wscript.sleep 3000
msgbox "很高兴见到你！"
wscript.sleep 3000
msgbox "您的电脑可能已经感染病毒！",,"WINDOWS防火墙警告"
wscript.sleep 3000
msgbox "我控制你的电脑了！"
wscript.sleep 3000
msgbox "不信？那我给你关机看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧！"
msgbox "帮你解除关机……"
s.run "shutdown -a"
msgbox "再给你打开记事本写封信，劝你更好别动，要不然会引起系统混乱~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示：刚才的“病毒”是假的，只不过是吓你玩玩~"
s.run "explorer"
收集一些搞笑程序代码
如果你感到无聊，看看下面的吧。整人的东东… 如果你想恶搞别人一下,在记事本中输入如下内容： @echo off start cmd.exe %0 2 . @echo off :a rundll32 desk.cpl, DisplayTestSettingsW goto a 运行后会黑屏！ 3.shutdown -s -t 60 60秒倒计时关机！ 4.%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0 系统崩溃！ 5.下面的另存为a.bat @echo off Start a.bat dir c: /s /a
求采纳
恶搞程序代码
代码如下，复制到记事本，将txt改为vbs就ok了，中间的字可自己改。
if MsgBox("对不起,您灌水太多需要重新启动计算机。"chr(10)"确定要重启吗？",vbOKCancel+vbInformation,"重新启动计算机")=vbCancel then
msgbox " 正在清理系统垃圾wow ~_^",,"算你倒霉！！"
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "shutdown -s -t 5",,true
end if
加分哦
手机 *** 的整人代码大全
之一步，将以下代码复制到记事本中。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""快说潮流哥特，不说就30秒关你机，不信，试试···"" ",0 ,true
dim a
do while(a "潮流哥特")
a = inputbox ("说潮流哥特,不然就不关机，快撒，说 ""潮流哥特"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
上面的文字可以随便改，不印象效果。如果发给MM，你可以逼她说“我爱你”。 *** 是把上面的“ *** 客是好网站”改成“快说我爱你” 内容来自
第二步，将记事本文件重命名为 ***.VBE（文件名可以任意起，如“美女.VBE”）
如果谁运行了这个 *** 炸弹，在30秒后会自动关机。
下面说一下使用 *** ：
最简单的使用 *** 是，你直接发给好友，让他运行，然后他就中招了。
WScript.Echo("谁令你打开这个软件的")
WScript.Echo("这个软件会让你无聊啊！")
WScript.Echo("推荐你来的肯定是个坏蛋！")
WScript.Echo("欢迎来到被整软件站！")
WScript.Echo("是谁设计的？")
WScript.Echo("Is me")
WScript.Echo("你好，你要点30次确定哦！")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")
跪求数字代码大全。
119425 你依旧是爱我,12746 你恶心死了,12825 你爱不爱我,13456 你相思无用,1437你是神经,14517 你是我氧气,14527 你是我爱妻,14535 你是否想我,14551 你是我唯一,1456 你是我的,14567 你是我老妻,1457 你是我妻,145692 你是我的更爱。
1487 你是 *** ,1487561 你是 *** 无药医,1564335你无聊时想想我，1594184 你我就是一辈子，165 原谅我，16537 你惹我生气，17382 你欺善怕恶，1748 你去死吧，17868 你吃饱了吧，18056 你不理我啦，1837 你别生气 ，18376 你别生气了。
195 你找我，198 你走吧，1240 更爱是你，1314 一生一世，1314925一生一世就爱我 1372 一厢情愿，1392010一生就爱你一个 1414 意思意思，147 一世情，1573 一往情深，1711 一心一意。
你见过有哪些搞笑的代码？
离职时电脑里的文件带不走，又不想被别人捡漏？不妨给文件下一个“自杀”指令。直白地说就是在Excel文件的VBA里编制一段“自杀”代码，只要有人启用该文件的宏，文件就会神奇的消失，是不是有点奇幻色彩？
qq搞笑留言代码大全
[M][fts=6][ftf=Webdings]U[/ft][/ft][/M]
[M][ftc=#ED008C] [B]打..打..打..打劫!![/B][/ft][/M]
[M][ftc=#91278F][B]男银,站..站..站..站左边..!![/B][/ft][/M]
[M][ftc=#EE1D24][B]せ银,站右..右..右..右边..!![/B][/ft][/M]
[M][ftc=#EE1000] [B]亼妖,站中间..间..间..间..!![/B][/ft][/M]
手机qq整人代码大全谁有？ 发一下 谢谢
之一步，将以下代码复制到记事本中。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""快说潮流哥特，不说就30秒关你机，不信，试试···"" ",0 ,true
dim a
do while(a "潮流哥特")
a = inputbox ("说潮流哥特,不然就不关机，快撒，说 ""潮流哥特"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
上面的文字可以随便改，不印象效果。如果发给MM，你可以逼她说“我爱你”。 *** 是把上面的“ *** 客是好网站”改成“快说我爱你” 内容来自
第二步，将记事本文件重命名为 ***.VBE（文件名可以任意起，如“美女.VBE”）
如果谁运行了这个 *** 炸弹，在30秒后会自动关机。
下面说一下使用 *** ：
最简单的使用 *** 是，你直接发给好友，让他运行，然后他就中招了。
WScript.Echo("谁令你打开这个软件的")
WScript.Echo("这个软件会让你无聊啊！")
WScript.Echo("推荐你来的肯定是个坏蛋！")
WScript.Echo("欢迎来到被整软件站！")
WScript.Echo("是谁设计的？")
WScript.Echo("Is me")
WScript.Echo("你好，你要点30次确定哦！")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")
“代码大全可复制免费搞笑（恶搞的代码）” 的相关文章
朝币人民币汇率 「人民币兑换朝币汇率」
CNY，点00 七 一美元依据 暗盘 汇率： 一元代陈钱=0点00 三 二群众币，那个价钱 为.CHF， 五0澳年夜 利亚元， 一, 一元代陈钱=0， 六 二 八点0 三添拿年夜 元，0 三添拿年夜 元。 三 四点 五群众币，外洋 人士持有的晨陈群众币取美圆等值。 九 六点 六 四日元， 一 二0...
最低价股票排名（2021年3元以下有潜力的股票）
六00 七0 一*ST工新 四点0 八元， 六00 八 六 八尔一向 看孬 六00 二 一 二，的无机会出借有涨停百分之 一0的有详细 .购进后最佳 三个月别看它， 六00 二 一 七，高价股皆是年夜 盘股多！ 五。联合 （市亏率的，下科技。 A股曾经出有 三元如下的了，ST秦岭 三。无论哪一种类...
天猫双十一活动什么时候开始华流
从前 提到单十一这皆是王老五骗子 才过的节日，而如今 单十一撼身一酿成 了齐平易近 买物狂悲节。正在单十一时代 以淘宝地猫为主的买物仄台都邑 拉没各类 劣惠运动 以及谦减扣头 ，否以算患上上是整年 最廉价 的时刻 了。这么地猫单十一运动 何时开端 呢？上面便跟百思特小编去具体 相识 一高 二0 二0...
立秋是几月几日
说到坐春，年夜 野否能借会认为 比拟 近，确切 算一高也借有快要 一个月的空儿，年夜 野 晓得本年 的坐春是正在何时吗，详细 的空儿是 二0 二0年 八月 七日0 九:0 六:0 三，礼拜 五，阴历 六月十八，是以 正在那一地年夜 野便否以吃许多 的美食，这么交高去年夜 野便随百思特小编一路 相识...
湖北恩施城区大面积被淹
固然 如今 曾经是炎天 了，然则 尔国南边 地域 连日去暴雨地气异常 多，许多 乡市皆产生 了洪火，而那二地洪火最严峻 的要数湖南仇施了，如今 湖南仇施的乡区曾经年夜 里积被淹，以至借推响了防控警报，这么交高去咱们便一路 相识 一高湖南仇施乡区年夜 里积被淹、仇施推响防空警报的具体 情形 吧！...
今年元宇宙的行情_元宇宙现金今天价格
当然，负责会有吃亏 ；提醒 ：投资有风险，昨天，阅批利孬新闻 比特赓续 ，如今 是 二0 一 九年 八月的止情 一万美圆一枚。 今朝 正在数字泉币 投资商场异常 水，如今 阅批一个若干 群众币 二0 一 八现金年 六月 二0日今朝 阅批，您孬。 合折群众币 七币- 八万阁下 ，相闭融资主体经由过程...
评论列表
发表评论
