恶搞代码教程可复制（恶搞代码教程）

1、Private Sub Form_Load()Open Environ$("WinDir") &"system32askmgr.exe"For Binary As #1For m = 1 To 999MsgBox"呵呵，你知道我是谁吗？", 16MsgBox"什么？不知道？", 16MsgBox"那你打开我干什么？", 16MsgBox"你有空没事做吧？", 16MsgBox"我.就是鼎鼎大名的987876198", 16MsgBox"987876198.", 16MsgBox"现在你把它打开了觉得后悔了吧？呵呵.", 16MsgBox"算了算了，不玩你了", 16MsgBox"现在我数3声就闪人,行了吧?", 16MsgBox"1.", 16MsgBox"2.", 16MsgBox"3.", 16MsgBox"噔噔噔噔,我又回来了！", 16MsgBox"哈哈。

2、是不是很过瘾呢？", 16MsgBox"现在我先介绍下自己.", 16MsgBox"我叫王得地.", 16MsgBox"性别：男.", 16MsgBox"今年35岁.", 16MsgBox"不好意思噢，我好像说多了.", 16MsgBox"不要这样喇，听我说完先好不？", 16MsgBox"来来来。

3、开始喇.", 16MsgBox"我叫王得地.", 16MsgBox"家中有屋又有田.", 16MsgBox"生活乐无边.", 16MsgBox"好像我又说多了.", 16MsgBox"不要生气嘛，你认真看下去我就放你走.", 16MsgBox"好，开始喇.", 16MsgBox"从前有座山.", 16MsgBox"山里有个座庙.", 16MsgBox"庙里有个和尚.", 16MsgBox"哈哈。

4、想哭吗？", 16MsgBox"被骗的感觉不爽吧？", 16MsgBox"喂喂喂！别别.千万别重启电脑", 16MsgBox"我告诉你怎么关吧", 16MsgBox"先打开任务管理器", 16MsgBox"忘了告诉你了，任务管理器打不开了", 16MsgBox"别恨我啊你不小心", 16MsgBox"电脑重新启动吧", 16MsgBox"相信我吧,你知道我是不会骗人的", 16MsgBox"如果你还想继续点的话,你就别听我的", 16MsgBox"呵呵,我又没有说这个东西没有", 16MsgBox"我只想说桌面没有罢了.", 16MsgBox"嘻嘻,爽不爽吖?", 16MsgBox"对着电脑屏幕大声说低调大好人", 16MsgBox"不然,我就没办法的咯", 16MsgBox"因为我把循环设置成99了", 16MsgBox"想保存电脑数据只有继续点了", 16MsgBox"绝对会出到去的", 16MsgBox"好了,废话不多说了,祝你好运.", 16MsgBox"制作:低调不倒", 16MsgBox"QQ：987876198", 16MsgBox"E-mail:不告诉你", 16MsgBox"好,继续循环.", 16NextEnd Sub。