[易语言读取本地TXT文件]1 2 3 4 5 6 7 8 .版本 2 .程序集 窗口程序集1 .子程序 _按钮1_被单击 .如果真 （通用对话框1.打开 （）） 编辑框1.内容 = 到文本 （读入文件 （通用对话框1.文件名）） .如果真结束 .子程...+阅读
.版本 2 .支持库 eAPI .支持库 shellEx .程序集 窗口程序集1 .程序集变量 文本， 文本型， ， ＂4＂ .程序集变量 文本组， 文本型， ， ＂0＂ .程序集变量 字符串， 文本型， ， ＂8＂ .程序集变量 注册键， 整数型， ， ＂8＂ .程序集变量 计次， 整数型 .程序集变量 计数， 整数型 .子程序 __启动窗口_创建完毕 编辑框1.是否允许多行 = 真 编辑框2.是否允许多行 = 真 编辑框3.是否允许多行 = 真 编辑框1.滚动条 = 2 字符串 = { “A”, “S”, “D”, “W”, “J”, “K”, “U”, “I” } 注册键值 （） 时钟1.时钟周期 = 1000 .子程序 _时钟1_周期事件 文本 [1] = 到文本 （读入文件 （取运行目录 （） + “\123.txt”）） .如果真 （文本 [1] ≠ 文本 [2]） 时钟1.时钟周期 = 0 文本处理 （） .如果真结束 .子程序 文本处理 文本组 = 分割文本 （文本 [1]， #换行符， ） 文本 [4] = “” .变量循环首 （取数组成员数 （文本组）， 取数组成员数 （文本组） - 1, -1， 计次） .如果 （计次 = 取数组成员数 （文本组）） 文本 [2] = 文本组 [计次] .否则 文本 [3] = 文本组 [计次] .如果结束 文本 [4] = 文本组 [计次] + #换行符 + 文本 [4] .变量循环尾 （） 编辑框1.加入文本 （#换行符， 文本 [4]） 计次 = 倒找文本 （文本 [3]， “ ”， ， 假） + 1 编辑框2.加入文本 （取文本左边 （文本 [3]， 计次）， #换行符） .计次循环首 （取文本长度 （文本 [2]）， 计次） .计次循环首 （8， 计数） .如果真 （到大写 （取文本中间 （文本 [2]， 计次， 1）） = 字符串 [计数]） _启动窗口.获取焦点 （） 模拟按键 （取代码 （字符串 [计数]， 1）， ， ） 跳出循环 （） .如果真结束 .计次循环尾 （） .计次循环尾 （） 文本 [2] = 文本 [1] 编辑框3.加入文本 （#换行符） 时钟1.时钟周期 = 1000 .子程序 注册键值 注册键 [1] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #A键） 注册键 [2] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #S键） 注册键 [3] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #D键） 注册键 [4] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #W键） 注册键 [5] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #J键） 注册键 [6] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #K键） 注册键 [7] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #U键） 注册键 [8] = 注册热键 （_启动窗口.取窗口句柄 （）， 标签1.取窗口句柄 （）， 0, #I键） .子程序 _标签1_反馈事件， 整数型 .参数 参数一， 整数型 .参数 参数二， 整数型 .计次循环首 （8， 计次） .如果真 （参数一 = 注册键 [计次]） 编辑框3.加入文本 （字符串 [计次]） .如果真结束 .计次循环尾 （） -------------------------- 有一点小问题，就是123.txt是只取最后连续的两行.第三行是取不到的，如： AAAAA 2015-09-04 20:40:33 S FFFFFF 2015-09-04 19:33:47 D
本文地址：https://www.39baobao.com/show/29_12497.html
以上内容来自互联网，请自行判断内容的正确性。若本站收录的信息无意侵犯了贵司版权，请联系我们，我们会及时处理和回复，谢谢.
以下为关联文档：
易语言读取TXT内容问题易语言读取文件内容，参考实例如下： .版本 2 .程序集 窗口程序集1 .子程序 _按钮2_被单击 .如果真 （通用对话框1.打开 （）） 编辑框1.内容 = 到文本 （读入文件 （通用对话框1.文件名）） .如...
