数字按次数的多少进行排列

红豆牛奶糖

编辑框1.内容=3,6,7,8,2,1,2,0,1,5,1,5,2,2,0,0,1,3,1,5,
把编辑框1里面的数字按出现次数多少进行排列。
数字为0到9，如果没出现的数字显示为0次。
显示格式为“数字-次数”。比如1出现5次=”1-5“ ，4出现0次=”4-0“ 如果次数一样的按，编辑框1输入的位置排列，如0-3 5-3（编辑框1.内容：0在5的前面）6-1 7-1 8-1（编辑框1.内容：6在7的前面7在8的前面）
显示在编辑框2里面
1-5 2-4 0-3 5-3 3-2 6-1 7-1 8-1 4-0 9-0   ‘排列好的结果。求源码，本小白初学易语言这个程序奋斗了2天了。求大神。

xiaowg

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
分割	文本型		0
统计	文本型		0
N	整数型
M	整数型
结果	文本型		2

分割 ＝ 分割文本 (编辑框1.内容, “,”, )
加入成员 (统计, 分割 [1] ＋ “-0”)
计次循环首 (取数组成员数 (分割), N)
调试输出 (分割 [N])
计次循环首 (取数组成员数 (统计), M)
结果 ＝ 分割文本 (统计 [M], “-”, )
调试输出 (结果 [1])
如果真 (结果 [1] ＝ 分割 [N])
统计 [M] ＝ 结果 [1] ＋ “-” ＋ 到文本 (到数值 (结果 [2]) ＋ 1)
跳出循环 ()
如果真 (M ＝ 取数组成员数 (统计))
加入成员 (统计, 分割 [N] ＋ “-1”)

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (分割), N)
计次循环首 (取数组成员数 (统计), M)
结果 ＝ 分割文本 (统计 [M], “-”, )
如果真 (到数值 (结果 [2]) ＝ 取数组成员数 (分割) － N ＋ 1)
编辑框2.内容 ＝ 编辑框2.内容 ＋ 统计 [M] ＋ “ ”
统计 [M] ＝ “ - ”

计次循环尾 ()
计次循环尾 ()
计次循环首 (10, N)
如果真 (寻找文本 (编辑框2.内容, 到文本 (N － 1) ＋ “-”, , 假) ＜ 0)
编辑框2.内容 ＝ 编辑框2.内容 ＋ 到文本 (N － 1) ＋ “-0” ＋ “ ”

计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 统计, 文本型, , "0"<br /> .局部变量 N, 整数型<br /> .局部变量 M, 整数型<br /> .局部变量 结果, 文本型, , "2"<br /> <br /> 分割 ＝ 分割文本 (编辑框1.内容, “,”, )<br /> 加入成员 (统计, 分割 [1] ＋ “-0”)<br /> .计次循环首 (取数组成员数 (分割), N)<br />     调试输出 (分割 [N])<br />     .计次循环首 (取数组成员数 (统计), M)<br />         结果 ＝ 分割文本 (统计 [M], “-”, )<br />         调试输出 (结果 [1])<br />         .如果真 (结果 [1] ＝ 分割 [N])<br />             统计 [M] ＝ 结果 [1] ＋ “-” ＋ 到文本 (到数值 (结果 [2]) ＋ 1)<br />             跳出循环 ()<br />         .如果真结束<br />         .如果真 (M ＝ 取数组成员数 (统计))<br />             加入成员 (统计, 分割 [N] ＋ “-1”)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (分割), N)<br />     .计次循环首 (取数组成员数 (统计), M)<br />         结果 ＝ 分割文本 (统计 [M], “-”, )<br />         .如果真 (到数值 (结果 [2]) ＝ 取数组成员数 (分割) － N ＋ 1)<br />             编辑框2.内容 ＝ 编辑框2.内容 ＋ 统计 [M] ＋ “ ”<br />             统计 [M] ＝ “ - ”<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (10, N)<br />     .如果真 (寻找文本 (编辑框2.内容, 到文本 (N － 1) ＋ “-”, , 假) ＜ 0)<br />         编辑框2.内容 ＝ 编辑框2.内容 ＋ 到文本 (N － 1) ＋ “-0” ＋ “ ”<br />     .如果真结束<br /> <br /> .计次循环尾 ()

这种排序规则没有数据库好难，最终还是完美给你实现了

呵呵仙

http://bbs.eyuyan.com/read.php?tid=385013
思路

红豆牛奶糖

呵呵仙 发表于 2016-4-30 22:34
http://bbs.eyuyan.com/read.php?tid=385013
思路

下载不了，哥。

610339241

用两次分割文本跟计次循环判断数值大小

红豆牛奶糖

610339241 发表于 2016-4-30 22:45
用两次分割文本跟计次循环判断数值大小

求源码，让我好好学习天天向上

安安静静

首先文本分割,然后把所有数字都弄到数组里面去,然后对比,  比如:拿第一个数字3来对比,跟后面的每一个数字对比,如果后面某一个数字等于3,那么下面的变量N就加1,对比完了就把这个数组成员删除了,然后又从6开始,依次循环就可以了.

呵呵仙

30万注彩票号码分类.zip (309.96 KB, 下载次数: 11)

2016-4-30 23:27 上传

点击文件名下载附件

红豆牛奶糖

呵呵仙 发表于 2016-4-30 23:27

看不懂，能把思路讲下吗，或者用源码帮我

xiaowg

还是给你附上源程序吧