k易语言html导入超级列表框,易语言超级列表框通用数据导入导出

.子程序 超级列表框_读取, 逻辑型, , 读取已保存的内容到超级列表框

.参数 超级列表框, 超级列表框

.参数 文件路径, 文本型

.参数 分割符合, 文本型, 可空, 默认为----

.参数 图片, 整数型, 可空

.局部变量 文本, 文本型

.局部变量 x, 整数型

.局部变量 数组, 文本型, , "0"

.局部变量 y, 整数型

.局部变量 项目, 文本型, , "0"

.局部变量 a, 整数型

.局部变量 分隔, 文本型

分隔 ＝ 选择 (是否为空 (分割符合), “----”, 分割符合)

.如果真 (文件是否存在 (文件路径) ＝ 假)

返回 (0)

.如果真结束

文本 ＝ 到文本 (读入文件 (文件路径))

数组 ＝ 分割文本 (文本, #换行符, )

.变量循环首 (1, 取数组成员数 (数组), 1, x)

项目 ＝ 分割文本 (数组 [x], 分隔, )

a ＝ 超级列表框.插入表项 (, , 图片, , , )

.计次循环首 (取数组成员数 (项目), y)

超级列表框.置标题 (x － 1, y － 1, 项目 [y])

.计次循环尾 ()

.变量循环尾 ()

返回 (x － 1)