Set WshShell=WScript.CreateObject(\"WScript.Shell\")
WshShell.AppActivate \"群 -零 起 点\"
For i=1 To 10 ' 要发送的次数
WScript.Sleep 500
WshShell.SendKeys \"^v\"
WshShell.SendKeys i
WshShell.SendKeys \"%s\"
Next
Set WshShell=WScript.CreateObject(\"WScript.Shell\")
WshShell.AppActivate \"群 -零 起 点\"
For i=1 To 10 ' 要发送的次数
WScript.Sleep 500
WshShell.SendKeys \"^v\"
WshShell.SendKeys i
WshShell.SendKeys \"%s\"
Next