超级列表框导出的问题

花喵喵

就是导出的时候 可以选择保存位置
例子.e (971.27 KB, 下载次数: 7)

3 天前 上传

点击文件名下载附件
这样要怎么写的

是可可吖

例子.e (972.71 KB, 下载次数: 16)

3 天前 上传

点击文件名下载附件


补充内容 (2025-3-28 20:20):
文本 ＝ 文本 ＋ 超级列表框.取标题 (i － 1, 0) ＋ 分隔符 ＋ 超级列表框.取标题 (i － 1, 1) ＋ 分隔符 ＋ 超级列表框.取标题 (i － 1, 2) ＋ #换行符

补充内容 (2025-3-28 20:21):
少写了一个 变量 文本   你自己加一下

花喵喵

是可可吖 发表于 2025-3-28 20:13
补充内容 (2025-3-28 20:20):
文本 ＝ 文本 ＋ 超级列表框.取标题 (i － 1, 0) ＋ 分隔符 ＋ 超级列表框 ...

这个时间怎么去掉重复 重复不导出
这个可以指定后缀吗，导出excel 也是这样写吗

Ruang

花喵喵 发表于 2025-3-28 20:39
这个时间怎么去掉重复 重复不导出
这个可以指定后缀吗，导出excel 也是这样写吗
...

用哈希表筛选去重复

你的猫

  

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
路径	文本型
保存文本	文本型
计次1	整数型
计次2	整数型
节点	节点

如果真 (超级列表框1.取表项数 () ≠ 0)
通用对话框1.类型 ＝ 1
通用对话框1.打开 ()
路径 ＝ 通用对话框1.文件名
计次循环首 (超级列表框1.取表项数 (), 计次1)
计次循环首 (超级列表框1.取列数 (), 计次2)
如果真 (计次2 ＞ 1)
如果 (超级列表框1.取列数 () ≠ 计次2)
保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1) ＋ “----”
保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1)


计次循环尾 ()
保存文本 ＝ 保存文本 ＋ #换行符
计次循环尾 ()
写到文件 (路径, 到字节集 (保存文本))

i支持库列表	支持库注释
EDataStructure	数据结构支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 iext<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 路径, 文本型<br /> .局部变量 保存文本, 文本型<br /> .局部变量 计次1, 整数型<br /> .局部变量 计次2, 整数型<br /> .局部变量 节点, 节点<br /> <br /> .如果真 (超级列表框1.取表项数 () ≠ 0)<br />     通用对话框1.类型 ＝ 1<br />     通用对话框1.打开 ()<br />     路径 ＝ 通用对话框1.文件名<br />     .计次循环首 (超级列表框1.取表项数 (), 计次1)<br />         .计次循环首 (超级列表框1.取列数 (), 计次2)<br />             .如果真 (计次2 ＞ 1)<br />                 .如果 (超级列表框1.取列数 () ≠ 计次2)<br />                     保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1) ＋ “----”<br />                 .否则<br />                     保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1)<br />                 .如果结束<br /> <br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />         保存文本 ＝ 保存文本 ＋ #换行符<br />     .计次循环尾 ()<br /> <br />     写到文件 (路径, 到字节集 (保存文本))

若相守卟离

去重复.e (1.06 MB, 下载次数: 6)

3 天前 上传

点击文件名下载附件
去除重复


已经帮你去除重复了
你看看是不是你想要的

Ruang

  

子程序名	返回值类型	公开	备 注
超级列表框去重复			以某列为参照 进行对比去重复
参数名	类 型	参考	可空	数组	备 注
超级列表框	超级列表框
对比列	整数型

变量名	类 型	静态	数组	备 注
i	整数型
局索引	整数型
局哈希	哈希表_ASM
局标题	文本型

局哈希.创建 ( #文本型, #整数型, 16)
变量循环首 (超级列表框.取表项数 () － 1, 0, -1, 局索引)
局标题 ＝ 超级列表框.取标题 (局索引, 对比列)
判断 (局哈希.cha询 (局标题) ＝ 真)
超级列表框.删除表项 (局索引)
局哈希.添加 (局标题, 0)

变量循环尾 ()
局哈希.清空 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 超级列表框去重复, , 公开, 以某列为参照 进行对比去重复<br /> .参数 超级列表框, 超级列表框<br /> .参数 对比列, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 局索引, 整数型<br /> .局部变量 局哈希, 哈希表_ASM<br /> .局部变量 局标题, 文本型<br /> <br /> 局哈希.创建 (#文本型, #整数型, 16)<br /> <br /> .变量循环首 (超级列表框.取表项数 () － 1, 0, -1, 局索引)<br />     局标题 ＝ 超级列表框.取标题 (局索引, 对比列)<br />     .判断开始 (局哈希.cha询 (局标题) ＝ 真)<br />         超级列表框.删除表项 (局索引)<br />     .默认<br />         局哈希.添加 (局标题, 0)<br />     .判断结束<br /> <br /> .变量循环尾 ()<br /> 局哈希.清空 ()

补充内容 (2025-3-28 21:30):
模块地址 bbs.125.la/forum.php?mod=viewthread&tid=14516715&highlight