|
发表于 2014-8-26 08:57:19
|
显示全部楼层
河北省石家庄市
.版本 2
.支持库 iext
.局部变量 i, 整数型
.局部变量 局_分割文本, 文本型, , "0"
.局部变量 局_分割文本2, 文本型, , "0"
.局部变量 文件名, 文本型
超级列表框_导入数据.全部删除 ()
.如果真 (通用对话框1.打开 ())
文件名 = 到文本 (读入文件 (通用对话框1.文件名))
局_分割文本 = 分割文本 (文件名, #换行符, )
.计次循环首 (取数组成员数 (局_分割文本), i)
局_分割文本2 = 分割文本 (局_分割文本 [i], “----”, )
超级列表框_导入数据.插入表项 (, 到文本 (超级列表框_导入数据.取表项数 () + 1), , , , )
处理事件 ()
超级列表框_导入数据.置标题 (超级列表框_导入数据.取表项数 () - 1, 0, 局_分割文本2 [1])
超级列表框_导入数据.置标题 (超级列表框_导入数据.取表项数 () - 1, 1, 局_分割文本2 [2])
超级列表框_导入数据.置标题 (超级列表框_导入数据.取表项数 () - 1, 2, 局_分割文本2 [3])
.计次循环尾 ()
.如果真结束
|
|