精易论坛

标题: 二维数组排序表格排序超级列表框排序(数值型排序、文本型排序) [打印本页]

---

作者: 1425113841    时间: 2020-4-28 11:24
标题: 二维数组排序表格排序超级列表框排序(数值型排序、文本型排序)
做这个东西主要是自己之前在给人写需求的时候，需要用到直接排序多维数组的操作。预算就在论坛找到了这个帖子，模块很好用，感觉很奇妙。

https://125.confly.eu.org/thread-14551980-1-1.html@走一回

预算这两天无聊，就自己撸了一下代码。来看看效果吧。






补充内容 (2020-4-28 11:26):
什么？你说源码？

补充内容 (2020-4-28 11:40):
在一楼呢

4.png (12.76 KB, 下载次数: 8)

下载附件

2020-4-28 11:24 上传

---

作者: 1425113841    时间: 2020-4-28 11:25
二维数组_表格排序.e (29.23 KB, 下载次数: 1188)

2020-4-28 11:25 上传

点击文件名下载附件
下载积分: 精币 -2 枚

源码

---

作者: 熬夜    时间: 2020-4-28 11:42

---

作者: wjswzj0    时间: 2020-4-28 19:53
支持开源~！感谢分享

---

作者: 杨明煜    时间: 2020-4-28 22:32
好东西.................

---

作者: a3960382663    时间: 2020-4-28 23:30
编辑框1.加入文本 (编辑框2.内容,#换行符 )

---

作者: kyo9766    时间: 2020-4-29 09:05
不看到最后，都不知道源码在哪，感谢分享

---

作者: iuseits    时间: 2020-4-29 10:11
谢谢分享~~~~来支持了

---

作者: orjg    时间: 2020-4-29 11:31

谢谢分享~~~~来支持了

---

作者: 网络注册会员    时间: 2020-4-30 10:24
支持支持支持

---

作者: 就是那个秋    时间: 2020-5-6 11:32
        支持开源~！感谢分享

---

作者: Dream丿夏天    时间: 2020-5-11 04:07
新技能已get√

---

作者: 714671513    时间: 2020-6-18 10:19
来了来了来了来了来了来了

---

作者: wxj213    时间: 2020-10-18 02:12
谢谢有没有高级表格

---

作者: ColdWords    时间: 2020-10-21 22:16
111111111111111111111111111111

---

作者: 记得回忆    时间: 2020-10-26 14:08
谢谢分享,很好很强大啊

---

作者: 小小小小123    时间: 2021-5-6 22:09
谢谢分享,很好很强大啊

---

作者: singlecolor    时间: 2021-5-7 04:07
666666666666666

---

作者: 网络注册网员    时间: 2021-5-11 09:00
下来试一下

---

作者: lm88818    时间: 2021-5-16 00:06
下来试一下

---

作者: lm88818    时间: 2021-5-16 00:11
有点复杂,老大能不做成模块

---

作者: 无敌的大驴    时间: 2021-6-24 20:13

---

作者: godkart    时间: 2021-7-4 10:49
看看是什么

---

作者: godkart    时间: 2021-7-4 10:49
看看是什么

---

作者: hi七天    时间: 2021-7-7 10:54
学习下  谢谢开源

---

作者: crary06    时间: 2021-8-17 22:10
看看，水一下。。。。。。都用的啥方法

---

作者: 走一回    时间: 2021-8-18 10:03
怎么跟我的这么像呢？

---

作者: 1425113841    时间: 2021-8-18 10:08

走一回 发表于 2021-8-18 10:03
怎么跟我的这么像呢？

就是仿你的   上面有@你   看到你写了模块, 觉得很不错一个思路, 然后自己实现了一下

---

作者: 1425113841    时间: 2021-8-18 10:09

走一回 发表于 2021-8-18 10:03
怎么跟我的这么像呢？

当然是仿你的一维和二维数组思路, 代码排序什么的都是自己实现

---

作者: 天天涨不停    时间: 2021-8-27 20:07
感谢楼主，正需要

---

作者: szwkq    时间: 2021-9-11 02:08

有点复杂,老大能不做成模块

---

作者: Mines    时间: 2021-10-27 10:04
感谢分享！

---

作者: chenyongcheng    时间: 2021-12-2 19:20
感谢楼主，正需要

---

作者: zht98    时间: 2021-12-22 09:42
6666666666666666666

---

作者: asd960608    时间: 2021-12-25 08:58
学习学习

---

作者: LG慈悲    时间: 2022-1-8 22:40

1425113841 发表于 2020-4-28 11:25
源码

神奇 为啥我下载这个例子提示失效 无法下载啊....

---

作者: 18074941457    时间: 2022-1-21 02:20
        支持开源~！感谢分享

---

作者: 一品墨林    时间: 2022-1-26 19:54
感谢分享

---

作者: zx83508218    时间: 2022-4-1 19:40
过来学习!!!!!!

---

作者: h123135157    时间: 2022-4-2 23:00
感谢分享

---

作者: JAVA777    时间: 2022-7-19 00:19
感谢分享，学习到了！！！

---

作者: 小黑bb    时间: 2022-8-14 23:55
支持开源~！感谢开源

---

作者: jatsaik    时间: 2022-9-8 16:52
简单实用，谢谢

---

作者: caimai    时间: 2022-10-18 15:22
谢谢，正在找这个东西

---

作者: caimai    时间: 2022-10-18 15:22
又效果了，再来回复

---

作者: k18556    时间: 2022-10-27 20:09
学习！！！！！！！！！！！！！！！！！

---

作者: k18556    时间: 2022-10-27 20:12
学习！！！！！！！！！！！！！！！！

---

作者: zk474l    时间: 2022-11-18 21:07
66666666666666666666666666

---

作者: miaoyang0802    时间: 2022-11-20 12:28
66666666666666666666666666

---

作者: tina0597    时间: 2022-12-23 21:54
00000000000000000

---

作者: champion    时间: 2023-1-4 00:30
666666666666666666666666666

---

作者: champion    时间: 2023-1-4 00:30
牛逼牛逼

---

作者: zyw512    时间: 2023-2-28 09:45
可以的 刚需

---

作者: myfaint009    时间: 2023-3-11 16:45

可以的 刚需

---

作者: wed543    时间: 2023-4-1 23:06
谢谢分享

---

作者: k18556    时间: 2023-6-12 17:49
xxxxxxxxxxxxxxxxx

---

作者: 杨明煜    时间: 2023-8-1 05:00
果然有水平

---

作者: wolfpack    时间: 2023-8-29 12:02
看起来相当好

---

作者: ikusai    时间: 2023-9-16 01:49
666666666666

---

作者: yankejun520    时间: 2023-9-27 17:20

---

作者: yankejun520    时间: 2023-9-27 17:21
正好需要这个呢

---

作者: djawei1990    时间: 2023-9-30 07:44
谢谢分享

---

作者: a0845a    时间: 2023-10-13 17:42
可以用吗  原来有个模块  搞不好了

---

作者: martinxm    时间: 2024-3-8 09:45

可以用吗  原来有个模块  搞不好了

---

作者: a13100412800    时间: 2024-3-8 14:56
好好学习！！！

---

作者: xmtian    时间: 2024-3-21 16:23
感谢分享。

---

作者: 13824055147    时间: 2024-4-2 16:29

感谢分享，很给力！~

---

作者: 为何，拥有    时间: 2024-4-10 14:20
        新技能已get√

---

作者: 为何，拥有    时间: 2024-4-10 14:21
        新技能已get√

---

作者: 柠檬秋刀鱼    时间: 2024-4-18 14:41
        支持开源~！感谢分享

---

作者: wangshiyuan    时间: 2024-4-19 21:54
支持开源~！感谢分享

---

作者: zitan    时间: 2024-5-15 15:33

支持开源~！感谢分享

---

作者: zitan    时间: 2024-5-15 15:33

支持开源~！感谢分享

---

作者: 矜陌    时间: 2024-7-17 22:56
谢谢楼主分享

---

作者: 908684098    时间: 2024-7-19 17:45
支持一下

---

作者: 神话gg    时间: 2024-7-20 15:46
{:7_432:}

---

作者: 求合体的处男    时间: 2024-7-24 01:01
支持开源~！感谢分享

---

作者: palangg    时间: 2024-8-12 03:05

支持开源~！感谢分享

---

作者: ytbihay    时间: 2024-8-19 09:28
666666666666666665

---

作者: YSH5858    时间: 2024-8-21 11:24
谢谢分享！

---

作者: 17688167987    时间: 2024-8-28 20:00
谢谢分享！

---

作者: 散淡    时间: 2024-9-8 00:41
支持开源~谢谢分享

---

作者: fu1013    时间: 2024-9-9 16:39
        支持开源~！感谢分享

---

作者: 安踏    时间: 2024-9-19 09:56

  

计次循环首 (超级列表框1.取列数 (), i)
如果真 (被单击列索引 ≠ i － 1 且 寻找文本 (超级列表框1.取列标题 (被单击列索引), “↑”, , 假) ≠ -1)  ' 不是选择列 而且 进行过排序
如果 (寻找文本 (超级列表框1.取列标题 (i － 1), “↑”, , 假) ≠ -1)
tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↑”, “”, , , 真)


tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↓”, “”, , , 真)
超级列表框1.置列标题 (i － 1, tempStr)

如果真 (被单击列索引 ≠ i － 1 且 寻找文本 (超级列表框1.取列标题 (被单击列索引), “↓”, , 假) ≠ -1)  ' 不是选择列 而且 进行过排序
如果 (寻找文本 (超级列表框1.取列标题 (i － 1), “↑”, , 假) ≠ -1)
tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↑”, “”, , , 真)


tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↓”, “”, , , 真)

超级列表框1.置列标题 (i － 1, tempStr)

计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .计次循环首 (超级列表框1.取列数 (), i)<br /> <br />     .如果真 (被单击列索引 ≠ i － 1 且 寻找文本 (超级列表框1.取列标题 (被单击列索引), “↑”, , 假) ≠ -1)  ' 不是选择列 而且 进行过排序<br /> <br />         .如果 (寻找文本 (超级列表框1.取列标题 (i － 1), “↑”, , 假) ≠ -1)<br />             tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↑”, “”, , , 真)<br />         .否则<br /> <br />             tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↓”, “”, , , 真)<br />         .如果结束<br />         超级列表框1.置列标题 (i － 1, tempStr)<br /> <br />     .如果真结束<br /> <br />     .如果真 (被单击列索引 ≠ i － 1 且 寻找文本 (超级列表框1.取列标题 (被单击列索引), “↓”, , 假) ≠ -1)  ' 不是选择列 而且 进行过排序<br />         .如果 (寻找文本 (超级列表框1.取列标题 (i － 1), “↑”, , 假) ≠ -1)<br />             tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↑”, “”, , , 真)<br />         .否则<br /> <br />             tempStr ＝ 子文本替换 (超级列表框1.取列标题 (i － 1), “↓”, “”, , , 真)<br />         .如果结束<br /> <br />         超级列表框1.置列标题 (i － 1, tempStr)<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

VX截图_20240919095609.png (98.38 KB, 下载次数: 0)

下载附件

2024-9-19 09:56 上传

---

作者: 爱书人飞    时间: 2024-10-4 13:19
感谢分享

---

作者: 小月虫    时间: 2024-10-15 01:18
感谢老铁！！！！！！！！！！！1

---

作者: lei5242323    时间: 2024-12-6 21:42
谢谢分享

---

作者: zitan    时间: 2024-12-28 10:36
感谢分享

---

作者: 13devils    时间: 2025-1-8 19:58
谢谢提供~~~~~~~

---

作者: 妖月红莲    时间: 2025-2-6 13:10
感谢分享

---

作者: a3363558    时间: 2025-4-24 06:40

谢谢分享

---

作者: chin0525    时间: 5 天前
有没有多列的

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4