易语言怎么一行一行读取TXT文本然后显示在编辑框里

Question

比如TXT文本里面有段数字：

123
321
000
这样 软件有个编辑框和一个按钮
点一下按钮编辑框就会读取TXT文本里面的第一行“123”，再点一下就变成“321”，再点一下就变成“000”这样一行一行的读取，求大神做个源码....
或者企鹅12 0 98.8 20 ， 39

Answer 1

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 Q_计数, 整数型

.子程序 _按钮1_被单击
.局部变量 J_文本号, 整数型
.局部变量 J_寄存_文, 文本型

J_文本号 ＝ 打开文件 (“1.txt”, , )
.如果真 (Q_计数 ＜ 1)
Q_计数 ＝ 1
.如果真结束
.计次循环首 (Q_计数, )
J_寄存_文 ＝ 读入一行 (J_文本号)
.计次循环尾 ()
编辑框1.内容 ＝ J_寄存_文
Q_计数 ＝ Q_计数 ＋ 1
关闭文件 (J_文本号)

Answer 2

.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 文件号, 整数型
.子程序 __启动窗口_创建完毕
文件号 ＝ 打开文件 (“C:\Users\Administrator\Desktop\2014年好莱坞大片.txt”, 1, )
 
.子程序 _按钮1_被单击
编辑框1.内容 ＝ 读入一行 (文件号)
 
.子程序 __启动窗口_将被销毁
关闭文件 (文件号)

 

Answer 3

问下百度知道 有高手