自己添加一个编辑框,一个按钮,一个进度条看看。(编辑框是否允许多行要为真)
.版本碰隐 2
.子程序 _按钮1_被单击
.局部变量 文件号, 整数型
.局部变量 时间, 整数型
文件号 = 打开文件 (“C:\Documents and Settings\Administrator\桌面\aa.txt”, , )
.如果真 (文件号 = 0)
返返悉回 ()
.如果真结束
移到文件首 (文件号)
进度条1.最大位置 = 取文件长度 (文件号)
时间 = 取启动时间 ()
.判断循环首 (是否在文件尾 (文件号, ) = 假)
处理事件 ()
编辑框1.加入文本 (读入一行 (文件号) + #换行符)
进度条1.位置 = 取读写位置 (文件号)
.判断循环尾 ()
输出调试文本 (“读取用时:” + 到文本 (取启动时间 () - 时间) + “毫秒”)
关闭文件 (文件号)
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)