VBS脚本刷QQ群

　　步骤一：生成VBS脚本

　　打开记事本，输入如下内容(图1.1.37)：

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

　　WshShell.AppActivate "群 －肖遥的交流群"

　　for i=1 to 10 '要发送的次数

　　WScript.Sleep 500

　　WshShell.SendKeys "^v"

　　WshShell.SendKeys i

　　WshShell.SendKeys "%s"

　　Next

　　（图1.1.37）

　　其中“for i=1 to 10”语句是用来控制发送次数的，表示发送10次。输入完毕后，将文件保存为以.vbs为后缀的任意文件名，如“QQ.vbs”

　　步骤二：轻松刷屏

　　打开一个群聊天窗口，然后复制你要发送的东西到剪贴板上，例如这里我们复制了一条“你看吧，如果重复就算了，改其它的吧”，然后双击刚才生成的“QQ.vbs”，切换到群聊天窗口中，可以看到已经自动刷屏了（图1.1.38）。

　　在每一条信息下面，显示了信息发送的条数，当发送完指定的条数后，便会自动停止了。