易语言怎么删除文本最后一行

发布网友发布时间：2022-04-23 03:05

共2个回答

热心网友时间：2023-06-29 06:03

这个容易,我教你
A ＝到文本 (读入文件 (“E:\a.txt”))
' 假如你的文件在E这个目录,先读入 A是文本局部变量
B ＝分割文本 (A, #换行符, )
' B是局部变量,数组的,用来分割,在局部变量的数组框里,加个0就可以
C ＝ B [取数组成员数 (B)] 'C是局部文本变量

'C就等于最后一行的文字了, 因为他用换行符分割了,有几行就有几组
'如果你最后一行是个空行,那C就会是空的,
'如果你想读第一行,那就是C=B[1] 2行就是C=B[2] 以此类推,懂吗？
'----------------------------------------------
看错,看成是读取最后一行
如果是删除,那也不难
---------------------------------
.版本 2
.计次循环首 (取数组成员数 (B) － 1, 计次)
C ＝ C ＋ B [计次] ＋ #换行符
.计次循环尾 ()

'''这样就可以了,全是手打,绝非抄袭追问是需要删除最后一行不是读取...麻烦写一下详细代码

追答.版本 2
A ＝到文本 (读入文件 (“E:\a.txt”))
B ＝分割文本 (A, #换行符, )
.计次循环首 (取数组成员数 (B) － 1, 计次)
C ＝ C ＋ B [计次] ＋ #换行符
.计次循环尾 ()

这样的话,最后C的结果就是删除了最后一行，看见吗，计次里，我把B的成员数减了1

热心网友时间：2023-06-29 06:03

易语言源码，参考如下：
.版本 2

.子程序删除最后空白文本, 文本型, 公开
.参数是否修改源文件, 逻辑型
.参数文件名, 文本型
.局部变量文件号, 整数型
.局部变量内容, 文本型
.局部变量修改后的内容, 文本型

编辑框1.内容＝ “”
文件号＝打开文件 (文件名, #读入, )
.判断循环首 (取反 (是否在文件尾 (文件号, )))
内容＝读入一行 (文件号)
.如果 (是否在文件尾 (文件号, ))
修改后的内容＝修改后的内容＋删尾空 (内容)
.否则
修改后的内容＝修改后的内容＋内容＋ #换行符
.如果结束
.判断循环尾 ()

关闭文件 (文件号)
.如果 (是否修改源文件＝真)
写到文件 (文件名, 到字节集 (修改后的内容))
.否则
.如果结束
返回 (修改后的内容)