代码移动一下就行
你用了跳转命令出错了而已
'==========以下是按键精灵录制的内容==========
word = Plugin.File.ReadFileEx("C:\1.txt")
//分割为行
Dim hang
hang = split(word, "|")
//循环打出每一行
For i = 0 To UBound(hang)
MoveTo 110, 115'移动内容--------------
Delay 1270
LeftDown 1
Delay 6
LeftClick 1
Delay 1
LeftUp 1'移动内容-----------------
SayString hang(i)
Delay 900
KeyPress "Tab", 1
//暂停,任意键继续
WaitKey
Delay 900
MoveTo 553, 377
Delay 90
LeftDown 1
Delay 2
LeftClick 1
Delay 1
LeftUp 1
Next
'==========以上是按键精灵录制的内容==========
貌似每次写完第一行之后你就按TAB键然后不断重复?