易语言中怎么实现数字大小排序(只排数字的序号而不是数字从大到小排列)列如:8 9 4 5 6 大到小的序号为

易语言中怎么实现数字大小排序(只排数字的序号而不是数字从大到小排列)列如:8 9 4 5 6 大到小的序号为
易语言中怎么实现数字大小排序(只排数字的序号而不是数字从大到小排列)列如:8 9 4 5 6 大到小的序号为2 1 5 4 3

 

下面是源代码:

追问

不文本排哦是数值 而且排不是数而是数的序号

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-05-01

看源码,下载附件就可以了↓

 

其实只要利用好了数组,这个就很简单了

还有的就是文本数组转化成整数数组的问题了……剩下的就不是问题了……

 

如楼主说的,如果要排序在原中的顺序的话,用数组对比就好了,我已经更新了源码了,请楼主留意

我已经更新了源码了,请楼主留意……

我已经更新了源码了,请楼主留意%

我已经更新了源码了,请楼主留意¥

我已经更新了源码了,请楼主留意#

追问

不是从大到小排序 是排数字的序号

追答

已经更新了……请注意查看

本回答被提问者和网友采纳
第2个回答  2013-05-01
.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 长度, 整数型
.程序集变量 a, 整数型
.程序集变量 b, 整数型
.程序集变量 较小的数, 整数型
.程序集变量 较大的数, 整数型
.程序集变量 中间数, 整数型
.程序集变量 替换后结果, 文本型
.程序集变量 暂存数, 整数型

.子程序 _按钮1_被单击

编辑框2.内容 = “”
a = 1
b = 2
长度 = 取文本长度 (编辑框1.内容)
中间数 = 到数值 (编辑框1.内容)
.计次循环首 (长度 - 1, )
调用子程序 (&对比算法, , , )
.计次循环尾 ()

.子程序 对比算法

较小的数 = 到数值 (取文本中间 (到文本 (中间数), 1, 1))
.计次循环首 (长度 - a, )
较大的数 = 到数值 (取文本中间 (到文本 (中间数), b, 1))
.如果真 (较小的数 > 较大的数)
暂存数 = 较小的数
较小的数 = 较大的数
较大的数 = 暂存数
.如果真结束
b = b + 1
.计次循环尾 ()
编辑框2.内容 = 编辑框2.内容 + 到文本 (较小的数)
a = a + 1
.如果真 (a = 长度)
编辑框2.内容 = 编辑框2.内容 + 到文本 (较大的数)
.如果真结束
b = 2
替换后结果 = 子文本替换 (编辑框1.内容, 到文本 (较小的数), “”, , 1, 真)
中间数 = 到数值 (替换后结果)