每周总结②——程序（重复发送内容）

这周程序验收完之后，我便收拾东西离校回家，然后将小学期的实验报告写完

之后在刷视频的时候刷到一个点击发送然后重复发送内容的程序，然后自己试了试，感觉还不错

效果如下图所示：

做法如下：

先新建一个txt文件，然后打开txt文件，在txt文件中写入如下代码：

1 Set WshShell = WScript.CreateObject("Wscript.Shell")
2 WshShell.AppActivate"昵称"
3 for i = 1 to 99
4 WScript.sleep 300
5 WshShell.Sendkeys "^v"
6 WshShell.Sendkeys"%s"
7 Next

其中

然后，将文件后缀名.txt改为.vbs

而后在聊天输入框中输入相关内容，将内容复制，然后双击此文件，点击发送即可。