TC官方合作论坛

标题: 请问文件导入到列表框后,如何判断导入结束,请指点 [打印本页]

作者: wangker111    时间: 2012-9-13 17:29
标题: 请问文件导入到列表框后,如何判断导入结束,请指点
请问文件导入到列表框后,如何判断导入结束,请指点
我是采用读一行命令导入的,但是最后那行读完后如何判断读完,不会写,请各位高手指点迷津
代码 如下

空间 导入数据
//定义默认空间
整型 线程句柄
功能 逻辑型 导入()
        字符型 内容
        整型 得到个数
        整型 文件句柄
        文件句柄=文件.打开("rc:Log1.txt")
如果(文件句柄==0)
    辅助.消息框("文件打开失败")
    否则
    循环(真)        
         内容=文件.读一行(文件句柄)  
         列表框.增加文本("列表框0",内容)
      如果()//这里如何判断结束,不会写啊!求给指点,问题就是这里
           跳出
          如果结束
    循环结束
      
       得到个数=列表框.得到个数("列表框0")
       编辑框.设置文本("编辑框0",转换.整型转字符型(得到个数))
        辅助.消息框("导入完毕")
        文件.关闭 (文件句柄)
    如果结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
线程句柄=线程.开启("导入数据.导入","")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
线程.关闭(线程句柄)
辅助.退出()
返回 真
功能结束
空间结束
//空间结束语句

作者: shine宝宝    时间: 2012-9-13 18:00
呃   你说读一行读到最后  是不是就读空了还是什么 用 字符串.长度 应该可以吧 -0-
作者: wangker111    时间: 2012-9-13 19:39
回复 2楼shine宝宝的帖子

谢谢了,终于成功了
作者: shine宝宝    时间: 2012-9-13 19:42
我都不确定!!!哈哈~~~




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1