.版本2.支持库iext.程序集窗口程序集1.程序集变量n,整数型.子程序__启动窗口_创建完毕.局部变量索引,整数型置随机数种子().计次循环首(10,)索引＝超级列表框1.插入表项(,,,,,)超级列表框1.置标题(索引,0,到文本(取随机数(10；
20000)))超级列表框1.置标题(索引,1,到文本(取随机数(10；
20000)))超级列表框1.置标题(索引；
2,到文本(取随机数(10；
20000))).计次循环尾().子程序_按钮1_被单击通用对话框1.类型＝1通用对话框1.过滤器＝“文本文档(*.txt)|*.txt”通用对话框1.默认文件后缀＝“txt”.如果真(通用对话框1.打开())写到文件(通用对话框1.文件名,到字节集(处理数值(超级列表框1,-1))).如果真结束.子程序处理数值,文本型.参数列表框,超级列表框,,目标.参数获取列数,整数型,,获取目标列，-1为获取全部表项大于10000的数.局部变量导出内容,文本型.局部变量e,整数型.计次循环首(超级列表框1.取表项数(),n)'用如果真看代码比较简单.如果真(获取列数＝-1).计次循环首(超级列表框1.取列数(),e).如果真(到数值(超级列表框1.取标题(n－1,e－1))＞10000)导出内容＝导出内容＋超级列表框1.取标题(n－1,e－1)＋#换行符.如果真结束.计次循环尾().如果真结束.如果真(获取列数≠-1).如果真(到数值(超级列表框1.取标题(n－1,获取列数))＞10000)导出内容＝导出内容＋超级列表框1.取标题(n－1,获取列数)＋#换行符.如果真结束.如果真结束.计次循环尾()返回(导出内容)
