超级列表框数据导出Excel表格

超级列表框数据导出Excel表格开源。
.计次循环首 (30, 局部_列数)
超级列表框_显示.插入列 (, 到文本 (局部_列数), , , , )
.计次循环尾 ()
.计次循环首 (200, 局部_行数)
局部_表项索引 ＝ 超级列表框_显示.插入表项 (, , , , , )
.计次循环首 (超级列表框_显示.取列数 (), 局部_列索引)
超级列表框_显示.置标题 (局部_表项索引, 局部_列索引 － 1, 到文本 (取随机数 (1000, 2000)))
.计次循环尾 ()
.计次循环尾 ()
公共_刷新超级列表框列宽 (超级列表框_显示)
公共_状态条置文本 (状态条_提示, 0, “ 共有 ” ＋ 到文本 (超级列表框_显示.取表项数 ()) ＋ “ 条记录”)