求助导出列表数据

我很低调

求助.zip (68.1 KB, 下载次数: 4)

昨天 09:32 上传

点击文件名下载附件 求助怎么写导出虚表 列表数据保存到桌面


补充内容 (2025-12-24 19:02):
求助加个批量删除检查框选中项

z573277679

  

子程序名	返回值类型	公开	备 注
_按钮_输出选中_被单击

变量名	类 型	静态	数组	备 注
选中索引	整数型
数组索引	整数型
输出内容	文本型
分隔符	文本型

选中索引 ＝ 虚表 [1].取现行选中项 ()
如果真 (选中索引 ＝ -1)
信息框 (“请先选中一行！”, #警告图标, , )
返回 ()

数组索引 ＝ 选中索引 ＋ 1
如果真 (数组索引 ＞ 取数组下标 (数据, ))
信息框 (“数据异常：选中的索引超出了数组范围”, #错误图标, , )
返回 ()

分隔符 ＝ “------”
输出内容 ＝ 数据 [数组索引].列 [1] ＋ 分隔符 ＋ 数据 [数组索引].列 [2] ＋ 分隔符 ＋ 数据 [数组索引].列 [3] ＋ 分隔符 ＋ 数据 [数组索引].列 [4]
调试输出 (“当前选中第 ” ＋ 到文本 (数组索引) ＋ “ 行：” ＋ 输出内容)
信息框 (输出内容, 0, “选中行详情”, )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮_输出选中_被单击<br /> .局部变量 选中索引, 整数型<br /> .局部变量 数组索引, 整数型<br /> .局部变量 输出内容, 文本型<br /> .局部变量 分隔符, 文本型<br /> <br /> 选中索引 ＝ 虚表 [1].取现行选中项 ()<br /> <br /> .如果真 (选中索引 ＝ -1)<br />     信息框 (“请先选中一行！”, #警告图标, , )<br />     返回 ()<br /> .如果真结束<br /> <br /> 数组索引 ＝ 选中索引 ＋ 1<br /> <br /> .如果真 (数组索引 ＞ 取数组下标 (数据, ))<br />     信息框 (“数据异常：选中的索引超出了数组范围”, #错误图标, , )<br />     返回 ()<br /> .如果真结束<br /> <br /> 分隔符 ＝ “------”<br /> <br /> 输出内容 ＝ 数据 [数组索引].列 [1] ＋ 分隔符 ＋ 数据 [数组索引].列 [2] ＋ 分隔符 ＋ 数据 [数组索引].列 [3] ＋ 分隔符 ＋ 数据 [数组索引].列 [4]<br /> <br /> 调试输出 (“当前选中第 ” ＋ 到文本 (数组索引) ＋ “ 行：” ＋ 输出内容)<br /> 信息框 (输出内容, 0, “选中行详情”, )

呓语丶

虚表不保存任何数据   所谓虚表  就只是让你看的   不是让你存数据的   自己写入的时候想办法保存

z573277679

  

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

变量名	类 型	静态	数组	备 注
导出内容	文本型
i	整数型
导出路径	文本型
单行文本	文本型
分隔符	文本型

' 1. 设置分隔符 (你想要的虚线)
分隔符 ＝ “------”
' 2. 设置保存路径为 txt
导出路径 ＝ 取特定目录 (3) ＋ “\自定义导出.txt”
' 3. 循环遍历数组
计次循环首 (取数组下标 (数据, ), i)
' 格式：列1 + ------ + 列2 + ------ + 列3 + ------ + 列4 + 换行符
单行文本 ＝ 数据 [i].列 [1] ＋ 分隔符 ＋ 数据 [i].列 [2] ＋ 分隔符 ＋ 数据 [i].列 [3] ＋ 分隔符 ＋ 数据 [i].列 [4] ＋ #换行符
' 加入总文本
导出内容 ＝ 导出内容 ＋ 单行文本
计次循环尾 ()
' 4. 写出到文件
如果 (写到文件 (导出路径, 到字节集 (导出内容)))
信息框 (“导出成功！已保存到桌面：自定义导出.txt”, 0, , )
信息框 (“导出失败”, #错误图标, , )

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .子程序 _按钮_导出_被单击<br /> .局部变量 导出内容, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 导出路径, 文本型<br /> .局部变量 单行文本, 文本型<br /> .局部变量 分隔符, 文本型<br /> <br /> ' 1. 设置分隔符 (你想要的虚线)<br /> 分隔符 ＝ “------”<br /> <br /> ' 2. 设置保存路径为 txt<br /> 导出路径 ＝ 取特定目录 (3) ＋ “\自定义导出.txt”<br /> <br /> ' 3. 循环遍历数组<br /> .计次循环首 (取数组下标 (数据, ), i)<br />     ' 格式：列1 + ------ + 列2 + ------ + 列3 + ------ + 列4 + 换行符<br /> <br />     单行文本 ＝ 数据 <i>.列 [1] ＋ 分隔符 ＋ 数据 <i>.列 [2] ＋ 分隔符 ＋ 数据 <i>.列 [3] ＋ 分隔符 ＋ 数据 <i>.列 [4] ＋ #换行符<br /> <br />     ' 加入总文本<br />     导出内容 ＝ 导出内容 ＋ 单行文本<br /> <br /> .计次循环尾 ()<br /> <br /> ' 4. 写出到文件<br /> .如果 (写到文件 (导出路径, 到字节集 (导出内容)))<br />     信息框 (“导出成功！已保存到桌面：自定义导出.txt”, 0, , )<br /> .否则<br />     信息框 (“导出失败”, #错误图标, , )<br /> .如果结束

我很低调

z573277679 发表于 2025-12-24 12:45
[e=4].版本 2
.支持库 shell

怎么点击按钮 输出每行内容呢 现行选中项+1输出行内容

z573277679

为什么每次都要追问我新的问题，感觉你的代码我不如完全写出来算了。建议下次直接把要求提完吧

我很低调

z573277679 发表于 2025-12-24 14:26
[e=4].版本 2
.支持库 spec

这个我知道 怎么批量删除选中项呢 在帮一下 谢谢！