打开文件

ye0918

怎么做到打开软件的时候自动把txt文档导入进超级列表框

LEOONL

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
分割	文本型		0
分割2	文本型		0
n	整数型
q	整数型
索引	整数型

分割 ＝ 分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), #换行符, )
计次循环首 (取数组成员数 (分割), n)
分割2 ＝ 分割文本 (分割 [n], “----”, )
索引 ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (取数组成员数 (分割2), q)
超级列表框1.置标题 (索引, q － 1, 分割2 [q])
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 分割2, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 q, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 分割 ＝ 分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), #换行符, )<br /> .计次循环首 (取数组成员数 (分割), n)<br />     分割2 ＝ 分割文本 (分割 [n], “----”, )<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (取数组成员数 (分割2), q)<br />         超级列表框1.置标题 (索引, q － 1, 分割2 [q])<br />     .计次循环尾 ()<br /> .计次循环尾 ()