按键精灵读取逐行读取TXT文档，一次读取一行

Question

我有一个文档，想这样提出里面的数据，比方说
张三
李四
王五
第一次脚本运行提出张三，然后等脚本运行完之后第二次循环的时候输入李四，结束之后再次循环输入王五，以此类推。

Answer 1

Text = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档.txt")//文档位置你自己改
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
Delay 1000
Msgbox "成功输入第 " & i+1 &" 行文本内容为："& Cstr(MyArray(i))
Delay 1000
i=i+1
Next
End If