我编辑框1-编辑框6均有1个一位或两位的数字,现在我想按下按钮后把这几个数字按从小到大的顺序排列(编辑框位置不变)
发个图片(不一定是这样的啊!编辑框位置一定不能变)
你是说编辑框里面的数字不变还是要让编辑框1显示最小的,编辑框2显示第二小的……
让编辑框1显示最小的的算法在这里,如果不想改变编辑框里面的数字,就把那些编辑框n.内容=到文本(数组[n])去掉。在数组里面就已经拍好续了,数组[1]最小,数组[2]第二小……数组[6]最大:
.版本 2
.子程序 _按钮1_被单击
.局部变量 交换, 逻辑型
.局部变量 未比数据数量, 整数型, 静态
.局部变量 交换变量, 整数型
.局部变量 位置变量, 整数型
.局部变量 数组, 整数型, , "0"
加入成员 (数组, 到数值 (编辑框1.内容))
加入成员 (数组, 到数值 (编辑框2.内容))
加入成员 (数组, 到数值 (编辑框3.内容))
加入成员 (数组, 到数值 (编辑框4.内容))
加入成员 (数组, 到数值 (编辑框5.内容))
加入成员 (数组, 到数值 (编辑框6.内容))
交换 = 真
' 也就是下面变量循环第一次的变量目标值
未比数据数量 = 6
.判断循环首 (交换 = 真)
交换 = 假
' 比较的次数比数据数量少一
.变量循环首 (1, 未比数据数量 - 1, 1, 位置变量)
' 前一个数大于后一个数,就将两数的位置交换
.如果真 (数组 [位置变量] > 数组 [位置变量 + 1])
' 数组可以是变量、文件、数据库(这里用的是变量)
交换变量 = 数组 [位置变量]
数组 [位置变量] = 数组 [位置变量 + 1]
' 以上3行代码是交换用的
数组 [位置变量 + 1] = 交换变量
交换 = 真
.如果真结束
.变量循环尾 ()
未比数据数量 = 未比数据数量 - 1
.判断循环尾 ()
编辑框1.内容 = 到文本 (数组 [1])
编辑框2.内容 = 到文本 (数组 [2])
编辑框3.内容 = 到文本 (数组 [3])
编辑框4.内容 = 到文本 (数组 [4])
编辑框5.内容 = 到文本 (数组 [5])
编辑框6.内容 = 到文本 (数组 [6])
让编辑框1显示最小的的算法在这里,如果不想改变编辑框里面的数字,就把那些编辑框n.内容=到文本(数组[n])去掉。在数组里面就已经拍好续了,数组[1]最小,数组[2]第二小……数组[6]最大:
.版本 2
.子程序 _按钮1_被单击
.局部变量 交换, 逻辑型
.局部变量 未比数据数量, 整数型, 静态
.局部变量 交换变量, 整数型
.局部变量 位置变量, 整数型
.局部变量 数组, 整数型, , "0"
加入成员 (数组, 到数值 (编辑框1.内容))
加入成员 (数组, 到数值 (编辑框2.内容))
加入成员 (数组, 到数值 (编辑框3.内容))
加入成员 (数组, 到数值 (编辑框4.内容))
加入成员 (数组, 到数值 (编辑框5.内容))
加入成员 (数组, 到数值 (编辑框6.内容))
交换 = 真
' 也就是下面变量循环第一次的变量目标值
未比数据数量 = 6
.判断循环首 (交换 = 真)
交换 = 假
' 比较的次数比数据数量少一
.变量循环首 (1, 未比数据数量 - 1, 1, 位置变量)
' 前一个数大于后一个数,就将两数的位置交换
.如果真 (数组 [位置变量] > 数组 [位置变量 + 1])
' 数组可以是变量、文件、数据库(这里用的是变量)
交换变量 = 数组 [位置变量]
数组 [位置变量] = 数组 [位置变量 + 1]
' 以上3行代码是交换用的
数组 [位置变量 + 1] = 交换变量
交换 = 真
.如果真结束
.变量循环尾 ()
未比数据数量 = 未比数据数量 - 1
.判断循环尾 ()
编辑框1.内容 = 到文本 (数组 [1])
编辑框2.内容 = 到文本 (数组 [2])
编辑框3.内容 = 到文本 (数组 [3])
编辑框4.内容 = 到文本 (数组 [4])
编辑框5.内容 = 到文本 (数组 [5])
编辑框6.内容 = 到文本 (数组 [6])
温馨提示:答案为网友推荐,仅供参考