求易语言读txt内容的源码
txt文件里内容格式大概是这样的,文本地址取运行目录要求:点击按钮1读取第一行文本到剪切板延迟(10000)读取第二行文本到剪切板延迟(10000)读取第三行文本到剪切板...
txt文件里内容格式大概是这样的,文本地址取运行目录
要求:
点击按钮1
读取第一行文本到剪切板
延迟(10000)
读取第二行文本到剪切板
延迟(10000)
读取第三行文本到剪切板
。。。。。。
往下执行。
用计次循环来写。
但是我不知道怎么做到依次读取第一行,第二行,第三行这样往下读
求大神 展开
要求:
点击按钮1
读取第一行文本到剪切板
延迟(10000)
读取第二行文本到剪切板
延迟(10000)
读取第三行文本到剪切板
。。。。。。
往下执行。
用计次循环来写。
但是我不知道怎么做到依次读取第一行,第二行,第三行这样往下读
求大神 展开
1个回答
展开全部
不用计次……然后把_按钮1_被单击换成时钟就好了……
.程序集 窗口程序集1
.程序集变量 文件号
.子程序 _启动子程序, 整数型
载入 (窗口1, , 真)
返回 (-1)
.子程序 _窗口1_创建完毕
通用对话框1.过滤器 = "文本文档|*.txt"'只允许txt文件
通用对话框1.初始目录 = 取运行目录 ()
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 = 字符 (0))'是否未选择
结束 ()
.如果真结束
文件号 = 打开文件 (通用对话框1.文件名, , )
_按钮1_被单击 ()
.子程序 _按钮1_被单击
.局部变量 F, 文本型
F = 读入一行 (文件号)
.如果真 (F ≠ 字符 (0))
编辑框1.内容 = F
置剪辑板文本 (F)'呵呵……
返回 ()
.如果真结束
信息框 ("已经到最后了,重新到最前", 0, )
移到文件首 (文件号)
_按钮1_被单击 ()'刷新
更多追问追答
追问
额。。。不要打开文件。不用通用对话框,我要的是点击按钮1,直接就到txt里去复制文本了
追答
是哪一个TXT……
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询