按键精灵读取txt文本随机行的两种写法

第一种写法，随机取txt文档内的某个段落

Randomize
Text = Plugin.File.ReadFileEx("F:\调用TXT\3-3屋面段落.txt")
MyArray = Split(Text, "|")
SayString MyArray(Int((UBound(MyArray) * Rnd) + 0))

第二种写法，读取txt文本随机行，以|||为分割

Text = Plugin.File.ReadFileEx("F:\调用TXT\3-3屋面段落.txt")
TracePrint Text
Var = Split(Text, "|||")
Var1 = UBound(Var)
TracePrint Var1
Randomize
行数 = Int((Var1 + 1) * Rnd)
TracePrint Var(行数)
SayString (Cstr(Var(行数)))