edb数据库浏览器和批量导出数据软件

超级列表框导出数据。稍微改一下成模块，非常方便调用。给大家学习了。

列数 ＝ 分割文本 (编辑框1.内容, “,”, )
.计次循环首 (超级列表框1.取表项数 (), n)
.计次循环首 (取数组成员数 (列数), 计次)
超级列表框1.取标题 (n － 1, 到整数 (列数 [计次]))
a ＝ a ＋ 超级列表框1.取标题 (n － 1, 到整数 (列数 [计次])) ＋ “-”
.计次循环尾 ()
最终文本 ＝ 取文本左边 (a, 取文本长度 (a) － 1) ＋ #换行符 ＋ 最终文本
a ＝ “”
.计次循环尾 ()
写到文件 (取运行目录 () ＋ “\数据.txt”, 到字节集 (最终文本))
信息框 (“导出完成”, 0, )