内容排序问题

天使与恶魔

2.e (933.56 KB, 下载次数: 5)

2023-7-18 18:23 上传

点击文件名下载附件
超级列表框的正序和倒序排序感觉不太好用 没有乱序  比如排好是这样
C:\g1\1\1行
D:\g1\2\2行
D:\g1\2\1行
F:\g1\3\3行
F:\g1\3\1行
F:\g1\3\2行
E:\g1\4\1行
就是同文件夹内容随机排序 而不是固定那样

呵呵仙

按文本型都是有字符大小顺序的。除非你自己创一套比大小算法。
如这个：https://bbs.125.la/forum.php?mod ... 14103644&extra=

笨来无一悟

跑一圈循环 随机交换变量 就乱了  交换变量(文本[取随机数(1,取数组成员数(文本))],文本[取随机数(1,取数组成员数(文本))])

天使与恶魔

笨来无一悟 发表于 2023-7-18 19:13
跑一圈循环 随机交换变量 就乱了  交换变量(文本[取随机数(1,取数组成员数(文本))],文本[取随机数(1,取数组 ...

看不懂啥意思

月下美孤

关键字=“:\g1\”
算法思路如下：
1、将文本按 #换行符   分割为 数组A 保存
2、用正则或者寻找文本的方式对 数组A 匹配关键字，然后取关键字的后1位，进行冒泡排序,保存数组A
3、用正则或者寻找文本的方式对 数组A 匹配关键字，然后取关键字的后3位，进行冒泡排序,保存数组A

最后的结果  数组A  ，就是你期望的





补充内容 (2023-7-18 20:16):
描述不准确，是后第1位   后第3位

美稀宗

其实这种想指定哪个排序都可以
懒得再写了，把原来写的例子改了一下

  

子程序名	返回值类型	公开	备 注
子程序3

变量名	类 型	静态	数组	备 注
a	文本型		0
b	整数型		0
重组数组	整数型		0
排列后_a	文本型		0
排列后_b	整数型		0
i	整数型

' C:\g1\1\1行
' D:\g1\2\2行
' D:\g1\2\1行
' F:\g1\3\3行
' F:\g1\3\1行
' F:\g1\3\2行
' E:\g1\4\1行
a ＝ { “C:\g1\1\1行”, “D:\g1\2\2行”, “F:\g1\3\2行”, “D:\g1\2\1行”, “E:\g1\4\1行”, “F:\g1\3\3行”, “F:\g1\3\1行”, “F:\g1\3\2行” }
b ＝ { 1, 2, 3, 2, 4, 3, 3, 3 }
' 数据预处理就不写了，反正就是建两个数组，第一个数组放原数据，第两个数组放要排列的数字
计次循环首 (取数组成员数 (b), i)
加入成员 (重组数组, b [i] × 10000 ＋ i)  ' 先将原数组顺序固定，这里引入10000是为了区分b的余数，引入的数大于b一个数量级就行
计次循环尾 ()
数组排序 (重组数组, )
计次循环首 (取数组成员数 (b), i)
加入成员 (排列后_a, a [重组数组 [i] ％ 1000])
加入成员 (排列后_b, b [重组数组 [i] ％ 1000])
计次循环尾 ()
数组排序 (b, )
调试输出 (“排前后b：”, b)
调试输出 (“排前后_b：”, 排列后_b)
调试输出 (“排前后_a：”, 排列后_a)
' * “排前后_a：” | 数组:8{“C:\g1\1\1行”,“D:\g1\2\2行”,“D:\g1\2\1行”,“F:\g1\3\2行”,“F:\g1\3\3行”,“F:\g1\3\1行”,“F:\g1\3\2行”,“E:\g1\4\1行”}

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序3<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 b, 整数型, , "0"<br /> .局部变量 重组数组, 整数型, , "0"<br /> .局部变量 排列后_a, 文本型, , "0"<br /> .局部变量 排列后_b, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> ' C:\g1\1\1行<br /> ' D:\g1\2\2行<br /> ' D:\g1\2\1行<br /> ' F:\g1\3\3行<br /> ' F:\g1\3\1行<br /> ' F:\g1\3\2行<br /> ' E:\g1\4\1行<br /> a ＝ { “C:\g1\1\1行”, “D:\g1\2\2行”, “F:\g1\3\2行”, “D:\g1\2\1行”, “E:\g1\4\1行”, “F:\g1\3\3行”, “F:\g1\3\1行”, “F:\g1\3\2行” }<br /> b ＝ { 1, 2, 3, 2, 4, 3, 3, 3 }<br /> ' 数据预处理就不写了，反正就是建两个数组，第一个数组放原数据，第两个数组放要排列的数字<br /> .计次循环首 (取数组成员数 (b), i)<br />     加入成员 (重组数组, b <i> × 10000 ＋ i)  ' 先将原数组顺序固定，这里引入10000是为了区分b的余数，引入的数大于b一个数量级就行<br /> .计次循环尾 ()<br /> 数组排序 (重组数组, )<br /> .计次循环首 (取数组成员数 (b), i)<br />     加入成员 (排列后_a, a [重组数组 <i> ％ 1000])<br />     加入成员 (排列后_b, b [重组数组 <i> ％ 1000])<br /> .计次循环尾 ()<br /> 数组排序 (b, )<br /> 调试输出 (“排前后b：”, b)<br /> 调试输出 (“排前后_b：”, 排列后_b)<br /> 调试输出 (“排前后_a：”, 排列后_a)<br /> ' * “排前后_a：” | 数组:8{“C:\g1\1\1行”,“D:\g1\2\2行”,“D:\g1\2\1行”,“F:\g1\3\2行”,“F:\g1\3\3行”,“F:\g1\3\1行”,“F:\g1\3\2行”,“E:\g1\4\1行”}