Q 谁有qq骂人神器工具?qq刷屏代码也行

2019-09-11 09:37:58 | 5384人阅读

A回答 2

程序猿

程序猿

2019-09-11 10:02:11

qq复制无限发消息的代码,分享给大家image.png

on error resume next
dim wsh,ye,path
set wsh = createobject("wscript.shell")
for i=1 to 30     
wscript.sleep 100
wsh.appactivate("bomb")
wsh.sendkeys "^v"
wsh.sendkeys i
wsh.sendkeys "%s"
next

复制上面代码存为vbs格式,然后随便复制点啥,然后打开qq消息框,点击这个复制.vbs文件就可以开始用了。代码里面的30代表30次,100是代表100毫秒发一次。

大家有啥不懂的可以评论留言

qq软件大师

qq软件大师

2019-09-11 09:55:13

给大家分享一款现在能用的代码。

Dim name,msg
name="请输入要刷屏的文字:" 
msg=Inputbox(name,"内容") 
 
 
Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate ""
for i=1 to 1000
WScript.Sleep 100
WshShell.SendKeys msg
WshShell.SendKeys "%s" 
next

谁有qq骂人神器工具?qq刷屏代码也行-代练群

首先复制代码,然后右键桌面空地方,选择新建-》文本文档,然后把代码复制进去保存文档,然后重命名用.vbs结尾

image.png

保存好后,然后打开一个qq对话框,qq群也是可以的,用这个软件还可以刷广告,只要你不怕被踢。=-=。对话框打开点击刚刚保存的文件

qq刷屏复制代码

然后输入刷屏文字点击确定就好了

浏览更多 >