Question

怎样用易语言实现数字排序？

就是把随机的几个数字进行从小到大的排序然后显示在编辑框里，用数组排序不知道怎么用，是几个随机生成的数字，越简单越好

Answer 1

附代码！ 如下。

.版本 2

.程序集 窗口程序集1
.程序集变量 变量, 整数型, , "0"
.程序集变量 计次, 整数型

.子程序 __启动窗口_创建完毕

置随机数种子 ()

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

排序1 ()

.子程序 排序1

编辑框1.内容 ＝ “”
数组排序 (变量, 真)
.计次循环首 (取数组成员数 (变量), 计次)
编辑框1.加入文本 (到文本 (变量 [计次]) ＋ “,”)
.计次循环尾 ()
清除数组 (变量)

.子程序 _随机按钮_被单击

取随机数1 ()

.子程序 取随机数1
.局部变量 随机数, 整数型

编辑框1.内容 ＝ “”
清除数组 (变量)
.计次循环首 (取随机数 (1, 20), 计次)
随机数 ＝ 取随机数 (1, 500)
加入成员 (变量, 随机数)
编辑框1.加入文本 (到文本 (变量 [计次]) ＋ “,”)
.计次循环尾 ()

追问

如图，蓝1---蓝6的6个程序集变量已经赋值，怎样用一个按钮把这6个变量直接排序并排序呢

追答

.版本 2

.程序集 窗口程序集1
.程序集变量 蓝1, 整数型
.程序集变量 蓝2, 整数型
.程序集变量 蓝3, 整数型
.程序集变量 蓝4, 整数型
.程序集变量 蓝5, 整数型
.程序集变量 蓝6, 整数型

.子程序 _按钮1_被单击
.局部变量 变量, 整数型, , "6"
.局部变量 最小的数, 整数型
.局部变量 最小位置, 整数型
.局部变量 计次, 整数型

' 首先弄一个数组变量，把几个变量都加进去，因为我不知道你为什么要用那么多变量，而不是直接用数组变量。
变量 [1] ＝ 蓝1
变量 [2] ＝ 蓝2
变量 [3] ＝ 蓝3
变量 [4] ＝ 蓝4
变量 [5] ＝ 蓝5
变量 [6] ＝ 蓝6
' 既然你不想用数组排序的话，那就复杂点。
' 首先要对数组里的数字一个一个的对比， 要知道谁是最小的，
.计次循环首 (取数组成员数 (变量), 计次)
最小的数 ＝ 变量 [1]
最小位置 ＝ 1
.计次循环首 (取数组成员数 (变量), 计次)
.如果真 (变量 [计次] ＜ 最小的数)
最小的数 ＝ 变量 [计次]
最小位置 ＝ 计次
.如果真结束

.计次循环尾 ()
编辑框1.加入文本 (到文本 (最小的数) ＋ “,”)
删除成员 (变量, 最小位置, )
.计次循环尾 ()
' 这样写是进行了一个一个的对比。 我想我说的够相信了。

.子程序 __启动窗口_创建完毕

蓝1 ＝ 5
蓝2 ＝ 15
蓝3 ＝ 3
蓝4 ＝ 20
蓝5 ＝ 1
蓝6 ＝ 12
' 我不知道你给这些变量都赋了什么值。所以，我在启动窗口创建完毕的时候，给他们都赋值了。