快捷搜索:  汽车  科技

css实现qq宠物(一串代码实现扣扣WX连发效果)

css实现qq宠物(一串代码实现扣扣WX连发效果)WshShell.Sendkeys"%s"WshShell.Sendkeys ifor i=1 to 20WScript.Sleep 100WshShell.Sendkeys"^v"

今天给大家分享一串非常神奇的代码,可以实现扣扣WX连发效果!

css实现qq宠物(一串代码实现扣扣WX连发效果)(1)

首先我们在桌面新建一个文本文档,并打开,粘贴这样一串代码!

Set WshShell= WScript.CreateObject("WScript.Shell")

WshShell.AppActivate""

for i=1 to 20

WScript.Sleep 100

WshShell.Sendkeys"^v"

WshShell.Sendkeys i

WshShell.Sendkeys"%s"

Next

css实现qq宠物(一串代码实现扣扣WX连发效果)(2)

按照上图修改对方名称和次数与间隔时间!

然后保存,并修改文件后缀名为VBS

css实现qq宠物(一串代码实现扣扣WX连发效果)(3)

然后在编辑框输入自己想发的内容,把它剪切下来,双击我们刚才建立好的VBS文件即可看到效果!

css实现qq宠物(一串代码实现扣扣WX连发效果)(4)

感兴趣的小伙伴们可以点击收藏万一哪天用到呢,还可以点一下关注哟,欢迎在留言区补充,提问,我们留言区见,关注本号,更多干货与你共享

猜您喜欢: