发布时间:2019-07-29 17:00:52
Set WshShell =
WScript.Create0bject
("Wscript.Shell")
WshShell.AppActivate"邢黎"
for i = 1 to 20
WScript.sleep 100
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WshShell.Sendkeys"%s"
Next
不能乱换行,应该是:
Set WshShell =WScript.Create0bject("Wscript.Shell")
WshShell.AppActivate"邢黎"
for i = 1 to 20
WScript.sleep 100
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WshShell.Sendkeys"%s"
Next
一句话不能随意分行的