1、

首先在桌面新建一个.txt文本文档 右击桌面即可

2、

打开它写入代码:首先输入:(复制以下代码) a=inputbox("输入按键次数")

3、

在输入:(复制以下代码) Set ws = CreateObject("Wscript.Shell")

4、

接下来输入循环语句:(复制以下代码) for i = 1 to a WScript.Sleep 3000 ws.SendKeys "a"