一台电脑
创建一个.txt文件（右击-->新建-->文本文档）。如果显示不了后缀（.txt）：1.双击打开我的电脑-->查看-->选项-->查看-->在高级选项里，找到'隐藏已知文件类型的扩展名'，去掉前面的勾，确定，就行了。2.双击打开我的电脑-->查看-->右侧有个“文件扩展名”,打勾，就行了（可能有的电脑系统，不支持这样的）。
填写无数字的代码。在.txt中填写，代码如下：（如图）没有数字的，显示发送了多少次：dim wshshell,aset wshshell=createobject('wscript.shell')a=inputbox ('输入要发信息次数'&chr(13)&chr(13)&'*******★life制作★******'&chr(13)&chr(13)&'请确定刚才光标是在QQ窗体内!','提示')WshShell.AppActivate '' '当前激活的聊天窗口名,例如'QQ群 - 群',在打开的对话框上有显示'wscript.sleep 1000for i=1 to 100 '循环的次数100'wscript.sleep 500 '暂停500毫秒'wshshell.sendkeys '^v' '粘贴wshshell.sendkeys '%s' '%s=enter和sendkeysSendKeys +发送内容'nextwscript.quit
填写有数字的代码。在.txt中填写，代码如下：有数字的，显示发送了多少次：dim wshshell,aset wshshell=createobject('wscript.shell')a=inputbox ('输入要发信息次数'&chr(13)&chr(13)&'*******★life制作★******'&chr(13)&chr(13)&'请确定刚才光标是在QQ窗体内!','提示')WshShell.AppActivate '' '当前激活的聊天窗口名,例如'QQ群 - 群',在打开的对话框上有显示'wscript.sleep 1000for i=1 to 100 '循环的次数100'wscript.sleep 500 '暂停500毫秒'wshshell.sendkeys '^v' '粘贴'wshshell.sendkeys i '数字' wshshell.sendkeys '%s' '%s=enter和sendkeysSendKeys +发送内容'nextwscript.quit
改后缀。选中文件，右击，重命名，把后缀 .txt 改成 .vbs，确定。这样，程序，就写好了。
1.双击文件，显示如下，界面。在qq框里输入你想输入的内容（如青春飞扬），c选中青春飞扬，ctrl+x（剪切）或者ctrl+c（复制）（个人建议ctrl+x），确定，再把鼠标的光标放在qq输入框里，就行了，可能防火墙，会阻止进程，选择，允许操作，确定，即可。
2.图片也可发送。具体操作与文字操作一致。
如果被你电脑的防火墙拦截，报错，请选择允许进程。
效果显示。
鼠标的光标放在要发送消息的框里
要发送的内容，要ctrl+x或者ctrl+c