.版本 2
.程序集 窗口程序集1
.子程序 _编辑框1_内容被改变
a [1] = 到数值 (编辑框1.内容)
.子程序 _编辑框2_内容被改变
a [2] = 到数值 (编辑框2.内容)
.子程序 _编辑框3_内容被改变
a [3] = 到数值 (编辑框3.内容)
.子程序 _编辑框4_内容被改变
a [4] = 到数值 (编辑框4.内容)
.子程序 _编辑框5_内容被改变
a [5] = 到数值 (编辑框5.内容)
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 t, 整数型
.计次循环首 (5, i)
.计次循环首 (5 - i, j)
.如果 (a [j] < a [j + 1])
t = a [j]
a [j] = a [j + 1]
a [j + 1] = t
.否则
.如果结束
.计次循环尾 ()
.计次循环尾 ()
编辑框1.内容 = 到文本 (a [1])
编辑框2.内容 = 到文本 (a [2])
编辑框3.内容 = 到文本 (a [3])
编辑框4.内容 = 到文本 (a [4])
编辑框5.内容 = 到文本 (a [5])
|