易语言取出文本第一行

如果你的目的是为了在你的临时文本的首部加123和

换行符

的话，可以这样写：

编辑框2.内容

＝

到文本

(读入文件

(“C:\临时文本.txt”))

编辑框2.内容=“123”+换行符+编辑框2.内容

写到文件

(“C:\临时文本.txt”,

到字节集

(编辑框2.内容))

如果你是单独为了取出文本的第一行，可以这样写：

先加个

文本型数组变量

文本数组

文本数组=分割文本（到文本

(读入文件

(“C:\临时文本.txt”))，#换行符）

编辑框2.内容=文本数组[1]

编辑框2.内容就是所取文本的第一行。

你可以自己试一试！

2

.程序集

窗口程序集1

.子程序

__启动窗口_创建完毕

.局部变量

a

.局部变量

b,

文本型

.局部变量

文本数组,

文本型,

,

"0"

.局部变量

c,

整数型

a

＝

打开文件

(“C:\1.txt”,

,

)

b

＝

读入文本

(a,

)

c

＝

3

'

这里是你要读的行数

文本数组

＝

分割文本

(b,

#换行符,

)

.判断开始

(c

＞

取数组成员数

(文本数组))

信息框

(“总行数为：”

＋

到文本

(取数组成员数

(文本数组))

＋

“行，不能读取超过”

＋

到文本

(取数组成员数

(文本数组))

＋

“行，呵呵！”,

0,

)

.默认

信息框

(文本数组

[c],

0,

)

.判断结束

关闭文件

(a)

2

.子程序

_按钮1_被单击

.局部变量

文本1,

文本型

.局部变量

行,

文本型,

,

"0"

.局部变量

次数,

整数型

文本1

＝

到文本

(读入文件

(“c:\1.txt”))

行

＝

分割文本

(文本1,

#换行符,

)

.计次循环首

(取数组成员数

(行),

次数)

编辑框1.加入文本

(到文本

(次数)

＋

“行”

＋

行

[次数]

＋

#换行符)

.计次循环尾

()