按键精灵读取TXT文本中的一行数据并输出

张凯 网络杂苑>按键精灵 2015-11-13 14:27 682字 1分钟 10291 0 字号: | |

按键精灵代码实现读取TXT文本中的一行数据并输出


Text = Plugin.File.ReadFileEx("F:\1-1湖北.txt")
TracePrint Text
Var = Split(Text, "|")
Var1 = UBound(Var)
TracePrint Var1
Randomize
行数 = Int((Var1 + 1) * Rnd)
TracePrint Var(行数)
SayString (Cstr(Var(行数)))


===========================================================================

'读取TXT文本,“”内为路径
Text = Plugin.File.ReadFileEx("F:\1-1湖北.txt")
'调用该TXT
TracePrint Text
'该TXT文本被Split分隔符为|,赋值给Var函数
Var = Split(Text, "|")
'Var转换为数组表变量,赋值给Var1
Var1 = UBound(Var)
'调用Var1
TracePrint Var1
'随机
Randomize
'行数=随机值+1
行数 = Int((Var1 + 1) * Rnd)
'调用行数为“行数的”Var
TracePrint Var(行数)
'输出行数为“行数的”Var
SayString (Cstr(Var(行数)))

本文链接:http://www.aswait.com/q/2526.html 百度已收录
版权申明:文章如未标注转载均为本站原创,转载请注明出处"张凯博客"。

发表评论

电子邮件地址不会被公开。必填项已用*标注

Ɣ回顶部
00:00 / 00:00
顺序播放