数组统计排序

cydcxy

统计编辑框1里面的数组出现的次数，再编辑框2里出现最多的数组排在最前面，如果出现次数相同的数组，就按数组大的排在前面，这个怎么弄啊，上次我问了两个数字的排序，一个大神帮忙写了，自己搞不定3个数字的

NOCOL

  

子程序名	返回值类型	公开	备 注
文本_排序	文本型
参数名	类 型	参考	可空	数组	备 注
参_原文本	文本型
参_分隔符	文本型

变量名	类 型	静态	数组	备 注
分割	文本型		0
i	整数型
数组	整数型		0
结果	文本型

分割 ＝ 分割文本 (参_原文本, 参_分隔符, )
计次循环首 (取数组成员数 (分割), i)
加入成员 (数组, 到整数 (分割 [i]))
计次循环尾 ()
数组排序 (数组, 假)
计次循环首 (取数组成员数 (数组), i)
结果 ＝ 结果 ＋ 文本_自动补零 (到文本 (数组 [i]), 4) ＋ 参_分隔符） ‘这里的自动补领去掉，直接到文本（数组[i]就可以匹配任意尾数，
计次循环尾 ()
返回 (结果)

.版本 2<br /> <br /> .子程序 文本_排序, 文本型<br /> .参数 参_原文本, 文本型<br /> .参数 参_分隔符, 文本型<br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 数组, 整数型, , "0"<br /> .局部变量 结果, 文本型<br /> <br /> 分割 ＝ 分割文本 (参_原文本, 参_分隔符, )<br /> .计次循环首 (取数组成员数 (分割), i)<br />     加入成员 (数组, 到整数 (分割 <i>))<br /> .计次循环尾 ()<br /> 数组排序 (数组, 假)<br /> .计次循环首 (取数组成员数 (数组), i)<br />     结果 ＝ 结果 ＋ 文本_自动补零 (到文本 (数组 <i>), 4) ＋ 参_分隔符） ‘这里的自动补领去掉，直接到文本（数组<i>就可以匹配任意尾数，<br /> .计次循环尾 ()<br /> 返回 (结果)

Harry·

冒泡排序，堆排序。可以自己找找例程

幻月工作室

你这个自己先好好把最基础的排序算法看看吧

NOCOL

这个上次就是我写的好像，改一句代码就可以了

NOCOL

@呵呵仙 我那个里面有一句自动补领，这一句限制了尾数，改成最大多少位就会补多少位，把这句去掉，不管多少位的都可以匹配的，

cydcxy

NOCOL 发表于 2016-11-18 18:50
@呵呵仙 我那个里面有一句自动补领，这一句限制了尾数，改成最大多少位就会补多少位，把这句去掉，不管多少 ...

怪不得我怎么改都不行

NOCOL

cydcxy 发表于 2016-11-18 18:54
怪不得我怎么改都不行

按照上面的，自动补零就会限制位数，按照上面的改就可以了

cydcxy

NOCOL 发表于 2016-11-18 18:54
[e=2].版本 2

.子程序 文本_排序, 文本型

了解了