Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.AppActivate "昵称" ' 账号昵称 for i=1 to 100 ' 轰炸次数 WScript.Sleep 20 ' 轰炸间隔 WshShell.SendKeys"^v" ' 轰炸内容 WshShell.SendKeys"%s" Next