Dim WshShell
Set WshShell=
CreateObject('WScript.Shell')
WshShell.AppActivate 'WoW'
for i=1 to 100000
WScript.Sleep 2000
WshShell.SendKeys '{TAB}'
WScript.Sleep 2000
WshShell.SendKeys '1'
WScript.Sleep 3000
WshShell.SendKeys '1'
WScript.Sleep 3000
WshShell.SendKeys '1'
WScript.Sleep 3000
WshShell.SendKeys '1'
WScript.Sleep 3000
WshShell.SendKeys '1'
WScript.Sleep 3000
next
问题来了：上面语句的语法错误在哪里？