这里的例子中，是导入了运行目录下的“1.txt” 文本文件内的内容，（界面控件，超级列表框，按钮1） 代码如下
.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 文本数组, 文本型, , "0"
.局部变量 计次, 整数型
文本 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\1.txt”))
文本数组 ＝ 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (文本数组), 计次)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (计次 － 1, 0, 文本数组 [计次])
.计次循环尾 ()
博思aippt
2024-07-20 广告
组件：通用对话框、按钮、超级列表框
名称均为：通用对话框1、按钮1、超级列表框1
代码如下：
.版本 2
.支持库 EThread
.支持库 iext
.程序集 窗口程序集_启动窗口
.程序集变量 文本, 文本型
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 ())
文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))
.如果真 (删首尾空 (文本) ≠ “”)
启动线程 (&子程序1, , )
.如果真结束
.如果真结束
.子程序 子程序1
.局部变量 分割_文本行, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 临时文本, 文本型
.局部变量 分割_号码, 文本型, , "0"
.局部变量 a, 整数型
分割_文本行 ＝ 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (分割_文本行), n)
临时文本 ＝ 删首尾空 (分割_文本行 [n])
.如果真 (临时文本 ≠ “”)
分割_号码 ＝ 分割文本 (临时文本, “ ”, )
a ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (a, 0, 分割_号码 [1])
超级列表框1.置标题 (a, 1, 分割_号码 [2])
超级列表框1.置标题 (a, 2, 分割_号码 [3])
超级列表框1.置标题 (a, 3, 分割_号码 [4])
超级列表框1.置标题 (a, 4, 分割_号码 [5])
超级列表框1.置标题 (a, 5, 分割_号码 [6])
超级列表框1.置标题 (a, 6, 分割_号码 [7])
超级列表框1.置标题 (a, 7, 分割_号码 [8])
.如果真结束
.计次循环尾 ()
