|
|
马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
请问文件导入到列表框后，如何判断导入结束，请指点
我是采用读一行命令导入的，但是最后那行读完后如何判断读完，不会写，请各位高手指点迷津
代码 如下
空间 导入数据
//定义默认空间
整型 线程句柄
功能 逻辑型 导入()
字符型 内容
整型 得到个数
整型 文件句柄
文件句柄=文件.打开("rc:Log1.txt")
如果(文件句柄==0)
辅助.消息框("文件打开失败")
否则
循环(真)
内容=文件.读一行(文件句柄)
列表框.增加文本("列表框0",内容)
如果()//这里如何判断结束,不会写啊!求给指点，问题就是这里
跳出
如果结束
循环结束
得到个数=列表框.得到个数("列表框0")
编辑框.设置文本("编辑框0",转换.整型转字符型(得到个数))
辅助.消息框("导入完毕")
文件.关闭 (文件句柄)
如果结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
线程句柄=线程.开启("导入数据.导入","")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
线程.关闭(线程句柄)
辅助.退出()
返回 真
功能结束
空间结束
//空间结束语句
|
|
/2 
发表于 2012-9-13 17:29:22
收藏
支持
反对
发表于 2012-9-13 18:00:18
楼主
