|
发表于 2013-7-15 20:11:53
|
显示全部楼层
江西省九江市
[e]
.版本 2
.支持库 iext
超级列表框_保存 (超级列表框1, 取运行目录 () + “\1.ini”, “\”)
.子程序 超级列表框_保存, 逻辑型, , 保存超级列表框中的内容,成功返回真,失败返回假。
.参数 超级列表框, 超级列表框
.参数 文件路径, 文本型
.参数 分割符号, 文本型, 可空, 默认为----
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 内容, 文本型
.局部变量 分隔, 文本型
分隔 = 选择 (是否为空 (分割符号), “----”, 分割符号)
.变量循环首 (1, 超级列表框.取表项数 (), 1, x)
.计次循环首 (超级列表框.取列数 (), y)
内容 = 内容 + 超级列表框.取标题 (x - 1, y - 1) + 分隔
.计次循环尾 ()
内容 = 内容 + #换行符
.变量循环尾 ()
返回 (写到文件 (文件路径, 到字节集 (内容)))
[/e] |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|