编辑框怎样读取.txt最后20行数据

看好这支烟 · 发表于 2011-10-20 10:47:07

编辑框，怎样读取.txt最后20行数据，请朋友们帮忙，在此先行谢过。

20.rar (12.84 KB, 下载次数: 29)

finemi · 发表于 2011-10-20 10:47:08

.版本 2
.支持库 spec

.程序集窗口程序集1

.子程序 _按钮1_被单击
.局部变量文本数组, 文本型, , "0"
.局部变量 n, 整数型
.局部变量文本结果, 文本型

编辑框1.内容＝到文本 (读入文件 (“福彩3D开奖记录.txt”)) ' 怎样读取 “福彩3D开奖记录.txt”最后20行数据。
文本数组＝分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\福彩3D开奖记录.txt”)), #换行符, )
调试输出 (到文本 (读入文件 (取运行目录 () ＋ “\福彩3D开奖记录.txt”)))
.计次循环首 (取数组成员数 (文本数组), n)
.如果真 (n ＞取数组成员数 (文本数组) － 20)
文本结果＝文本结果＋文本数组 [n] ＋ #换行符
.如果真结束

.计次循环尾 ()
编辑框1.内容＝文本结果

流星划空 · 发表于 2011-10-20 11:10:27

倒找文本……

xuyishuai · 发表于 2011-10-20 11:17:40

学习了，哈哈。。

a123456d · 发表于 2011-10-20 12:35:12

弄个一个数组变量用换行符作为分割全部分割完之后，取最后的20个不久行了

csfgzs · 发表于 2011-10-20 12:56:27

.版本 2
.支持库 spec

.程序集窗口程序集1

.子程序 _按钮1_被单击
.局部变量文本数组, 文本型, , "0"
.局部变量 n, 整数型
.局部变量文本结果, 文本型

编辑框1.内容＝到文本 (读入文件 (“福彩3D开奖记录.txt”)) ' 怎样读取 “福彩3D开奖记录.txt”最后20行数据。
文本数组＝分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\福彩3D开奖记录.txt”)), #换行符, )
调试输出 (到文本 (读入文件 (取运行目录 () ＋ “\福彩3D开奖记录.txt”)))
.计次循环首 (取数组成员数 (文本数组), n)
.如果真 (n ＞取数组成员数 (文本数组) － 20)
文本结果＝文本结果＋文本数组 [n] ＋ #换行符
.如果真结束

.计次循环尾 ()
编辑框1.内容＝文本结果

dspeeding · 发表于 2011-10-20 13:52:24

用换行符分割文本到数组然后取最后20个貌似不难

看好这支烟 · 发表于 2011-10-20 14:08:45

谢谢朋友们！！！{:3_244:}{:3_244:}祝朋友们天天开心！！！

布丁` · 发表于 2011-10-20 15:12:29

了解了…谢谢分享…

布丁` · 发表于 2011-10-20 15:12:51

了解了…谢谢分享…

		自动登录	找回密码
密码			注册

[已解决] 编辑框怎样读取.txt最后20行数据

最佳答案