这是 qq整人代码 VB

1728人阅读 评论(0) 收藏 举报
On Error Resume Next
 Dim wsh,ye 
 set wsh=createobject("wscript.shell")
 for i=1 to 10 wscript.sleep 700 
 wsh.AppActivate("与 xx 聊天中")
wsh.sendKeys "^v"
 wsh.sendKeys i wsh.sendKeys "%s"
 next 

wscript.quit


写入记事本,

改文件后缀.vbs

“与 xx 聊天中”改为qq好友昵称

愉快再见!!!!

查看评论

一段整人代码

 如果爱我就请    function run(obj) { obj.style.position="absolute";  obj.style.left = window.screen.availW...
  • superdullwolf
  • superdullwolf
  • 2006年07月21日 17:04
  • 1367

VBS代码--很恶心的整人效果

----我们会经常遇到一些无聊的文件,一旦我们打开它就会出现各种烦人的新窗口,今天来看的是VBS脚本---- 一:VBS简介 VBS是基于Visual Basic的脚本语言。VBS的全称是:Micr...
  • qq_32616315
  • qq_32616315
  • 2016年06月02日 20:26
  • 13693

用vb编写的一个简单的整人程序

  • 2009年04月04日 19:08
  • 49KB
  • 下载

VB整人代码【摘】

一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可). xx.vbs=> 复制代码 代码如下:O...
  • huoyan403
  • huoyan403
  • 2016年08月23日 11:39
  • 619

VB 整人程序 带源码

  • 2014年07月28日 18:00
  • 3KB
  • 下载

【整蛊代码】说我是傻子,不说xx秒就强制关机

第一步:新建个文本文档,在文本里写上下面的代码 : --------------我是分割线,不要复制我------------ on error resume next dim WSHs...
  • zml_2015
  • zml_2015
  • 2015年08月16日 00:19
  • 13259

整人大全

1、找一个朋友,让他先说3遍“老鼠”,然后再说3遍“鼠老”,待他说完“老鼠,老鼠,老鼠,鼠老,鼠老,鼠老”之后,立即问他“猫最怕什么”,几乎可以保证他会答“老鼠”,本人试过多次,屡试不爽。 2、随便找...
  • changxiang
  • changxiang
  • 2005年02月16日 17:34
  • 809

写了一个整人程序,较简单,有兴趣者可以看看

程序是基于WPF开发的,动态创建对象和动画。   using System; using System.Collections.Generic; using System.Linq; u...
  • tcjiaan
  • tcjiaan
  • 2011年12月10日 00:18
  • 4798
    个人资料
    等级:
    访问量: 3万+
    积分: 1104
    排名: 4万+
    文章分类
    最新评论