在本地创建一个.vbs的文本文件，添加下面的代码。
On Error Resume Next
Dim chshyz
set chshyz=createobject("wscript.shell")
wscript.sleep 2000
for i=1 to 10
wscript.sleep 8
chshyz.sendKeys "^v"
chshyz.sendKeys i #若不加提示，则去掉此行代码
chshyz.sendKeys "%s"
next
wscript.quit- wx窗口，聊天框输入内容，复制，双击.vbs文件
