代码为什么提示语法错误

Set WshShell=

WScript. CreateObject

("WScript. Shell")

WshShell. AppActivate“予世”

for  i=1  to  99

WScript. Sleep 99

WshShell. SendKeys "^V"

WshShell. SendKeys  i

WshShell. SendKeys "%s"

Next

这样的错误