怎么实现依次读取多行文本里的内容？

27005151 · 发表于 2011-11-20 04:06:03

先啰嗦两两，我是小菜鸟，刚来这里学习几天，这几天在这里学了不少东西，可能是自己太笨了，有些东西不能灵活应用起来，

以下正题：我要实现一个功能，就是读取一个文本文件，然后把里面的内容分别添加到编辑框1 和编辑框2 里面，如文件里面的内容是
11111----22222
33333----44444
能否点击一次按钮让第一行前面的数字添加的编辑框1 里面，后面的数字同时添加到编辑框2 里面，再点一次按钮就添加第二行的数字依此类推，

在这里先谢谢啦，最好能出个教程，详细讲解一下是怎么做的，我挺笨的，有时候理解不了。。{:soso_e110:}

爱家的小懒虫 · 发表于 2011-11-20 04:06:04

本帖最后由爱家的小懒虫于 2011-11-20 22:41 编辑

27005151 发表于 2011-11-20 21:25
源码看了，可以实现我所要的功能。只是我不明白里面的每一步骤是什么意思。麻烦这位哥们能否出一个文本 ...

.版本 2
.程序集窗口程序集1
.程序集变量文本, 文本型
.子程序 _按钮1_被单击
通用对话框1.类型＝ 0 ' 类型 0表示打开 1表示保存 2表示字体 3表示帮助
.如果真 (通用对话框1.打开 ()) ' 打开后选择了文件的话返回真未选的话返回假
文本＝到文本 (读入文件 (通用对话框1.文件名)) ' 返回真执行读入文本内容到文本变量!
信息框 (“读取完成!”, 0, ) ' 读取好内容,弹出信息提示完成
.如果真结束
.子程序 _按钮2_被单击
.局部变量分割行, 文本型, , "0"
.局部变量分割列, 文本型, , "0"
.局部变量 i, 整数型, 静态
.局部变量编辑框, 编辑框
.局部变量 j, 整数型
.如果真 (文本 ≠ “”) ' 判断读取到的内容是否为空,空的话,直接结束.
分割行＝分割文本 (文本, #换行符, ) ' 分割文本命令,把文本内容按换行符分割. 到分割行这个数组. 保存每一行的内容
' 11111----22222 '这是其中第1行的内容即: 分割行[1] = 11111----22222
i ＝ i ＋ 1 ' 按一次按钮 i 就是第几行第1次读的是第1行分割行[1] 第2次读的是第2行分割行[2]
.如果真 (i ＞取数组成员数 (分割行)) ' 判断是否超过最后行了
i ＝ 0 ' 超过了.我们重置 i=0
信息框 (“已经到底了!”, 0, ) ' 提示
返回 () ' 程序结束
.如果真结束
.如果真 (分割行 [i] ≠ “”) ' 如果 i 还没超过最后行,那么我们把这行再分割
分割列＝分割文本 (分割行 [i], “----”, ) ' 分割行[1] = 11111----22222 我们把这行再分割一下, 分割符号就是他们之间的 "----"
.计次循环首 (取数组成员数 (分割列), j) ' 循环下,分割出来多少项就循环多少次,这里是分割结果是 11111 和 22222 ,那么就是2次
编辑框＝取标记组件 (j) ' 获取组件,第1次获取编辑框1 第2次获取编辑框2
编辑框.内容＝分割列 [j] ' 把内容写的编辑框.内容中去. 第1项内容(11111) 给第1个编辑框第2项内容(22222) 给第2个编辑框
.计次循环尾 ()
.如果真结束
.如果真结束
' 结束

复制代码

№ご绝对へ酷 · 发表于 2011-11-20 04:59:43

沙发拿了我是打酱油的{:3_233:}

爱家的小懒虫 · 发表于 2011-11-20 20:10:56

读取.rar (1.58 KB, 下载次数: 138)

27005151 · 发表于 2011-11-20 21:25:21

本帖最后由 27005151 于 2011-11-20 21:29 编辑

爱家的小懒虫发表于 2011-11-20 20:10

源码看了，可以实现我所要的功能。只是我不明白里面的每一步骤是什么意思。麻烦这位哥们能否出一个文本或者视频教程发给我，说明每一步是怎么来的，是什么意思。。谢谢啦。教程放上以后我剩下的8个精币都送你。买你那个教程。。如果只要源码的话，我收集的都有，只是不明白是什么意思的话，以后不能纳为已用。不可以灵活运用。请体谅。。再一次感谢。。{:3_240:}

tcz918 · 发表于 2011-11-20 22:15:30

这个我也想知道

级别低手 · 发表于 2011-11-29 02:43:25

这个我也想知道

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

[已解决] 怎么实现依次读取多行文本里的内容？

最佳答案

评分