Question

易语言怎么导出超级列表框里的内容

易语言怎么导出超级列表框里的内容，用“----”分割。下面是我写的代码但是有问题

.版本 2
.支持库 iext
.子程序 _号码导出_被选择
.局部变量 i, 整数型
.局部变量 文本, 文本型
.局部变量 内容, 文本型
.局部变量 计次, 整数型
通用对话框1.类型 ＝ 1
通用对话框1.默认文件后缀 ＝ “txt”
通用对话框1.过滤器 ＝ “文本文件(*.txt)|*.txt”
.如果真 (通用对话框1.打开 ())
.计次循环首 (超级列表框1.取表项数 (), i)
sid ＝ 超级列表框1.取标题 (i － 1, 3)
写到文件 (通用对话框1.文件名, 读入文件 (通用对话框1.文件名) ＋ 到字节集 (超级列表框1.取标题 (i － 1, 1) ＋ “----” ＋ 超级列表框1.取标题 (i － 1, 2) ＋ #换行符))
写到文件 (通用对话框1.文件名, 到字节集 (文本))
.计次循环尾 ()

Answer 1

你不应该这么直接写到文件，应该把超级列表框的表项标题存放到一个文本变量中，最后再写到文件。

追问

求代码啊 大哥

追答

.版本 2
.支持库 iext
.子程序 _号码导出_被选择
.局部变量 i, 整数型
.局部变量 文本, 文本型
.局部变量 内容, 文本型
.局部变量 计次, 整数型
通用对话框1.类型 ＝ 1
通用对话框1.默认文件后缀 ＝ “txt”
通用对话框1.过滤器 ＝ “文本文件(*.txt)|*.txt”

.计次循环首 (超级列表框1.取表项数 (), i)
sid ＝ 超级列表框1.取标题 (i － 1, 3)
文本=文本+超级列表框1.取标题 (i － 1, 1) ＋ “----” ＋ 超级列表框1.取标题 (i － 1, 2) ＋ #换行符)

.计次循环尾 ()
.如果真 (通用对话框1.打开 ())

写到文件 (通用对话框1.文件名, 到字节集 (文本))