打开易语言，创建windows窗口程序。

添加两个编辑框，一个按钮，编辑框1写内容9,4,7,2,5,6,1,3,10,8

点击按钮，开始编写代码，将编辑框1中的数字内容分割为数组。

冒泡排序，比较相邻两个数字大小，前大后小则互换位置，数组内所有成员比较结束后，最大的成员被留在了最后。然后不去管最后一个成员，对前面的成员再次进行之前的比较互换过程。如果有互换计次加1，使用循环判断首()命令，当计次为0时，循环结束。代码如下：

.版本 2

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

.局部变量 数字排序, 文本型, , 0

.局部变量 i, 整数型

.局部变量 临时文本, 文本型

.局部变量 计次, 整数型, , , 互换次数，有互换操作就计次加1

.局部变量 循环次数, 整数型

数字排序 ＝ 分割文本 (编辑框1.内容, “,”, )

循环次数 ＝ 取数组成员数 (数字排序) － 1

.循环判断首 ()

计次 ＝ 0

.计次循环首 (循环次数, i)

.如果真 (到整数 (数字排序 ) ＞ 到整数 (数字排序 ))

临时文本 ＝ 数字排序

数字排序 ＝ 数字排序

数字排序 ＝ 临时文本

计次 ＝ 计次 ＋ 1

.如果真结束

.计次循环尾 ()

循环次数 ＝ 循环次数 － 1

.循环判断尾 (计次 ＞ 0)

将最终结果输出至编辑框2中。完整代码如下：

.版本 2

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

.局部变量 数字排序, 文本型, , 0

.局部变量 i, 整数型

.局部变量 临时文本, 文本型

.局部变量 计次, 整数型, , , 互换次数，有互换操作就计次加1

.局部变量 循环次数, 整数型

数字排序 ＝ 分割文本 (编辑框1.内容, “,”, )

循环次数 ＝ 取数组成员数 (数字排序) － 1

.循环判断首 ()

计次 ＝ 0

.计次循环首 (循环次数, i)

.如果真 (到整数 (数字排序 ) ＞ 到整数 (数字排序 ))

临时文本 ＝ 数字排序

数字排序 ＝ 数字排序

数字排序 ＝ 临时文本

计次 ＝ 计次 ＋ 1

.如果真结束

.计次循环尾 ()

循环次数 ＝ 循环次数 － 1

.循环判断尾 (计次 ＞ 0)

编辑框2.内容 ＝ “”

.计次循环首 (取数组成员数 (数字排序), i)

编辑框2.内容 ＝ 编辑框2.内容 ＋ 数字排序 ＋ “,”

.计次循环尾 ()