.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 行数, 整数型
.局部变量 列数, 整数型
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 temp, 文本型
.局部变量 text, 文本型
.局部变量 new, 文本型
行数 = 超级列表框1.取表项数 ()
列数 = 超级列表框1.取列数 ()
.计次循环首 (行数, i)
.计次循环首 (列数, j)
temp = 超级列表框1.取标题 (i - 1, j - 1)
text = text + temp + “ ”
.计次循环尾 ()
new = new + text + #换行符
text = “”
.计次循环尾 ()
写到文件 (取运行目录 () + “\text.txt”, 到字节集 (new))
写出文本(超级列表框1.取标题())
超级列表框1.取标题 (, )