> ## 实例:冒泡排序
![](https://box.kancloud.cn/d661652ae4d959678690801d8d78a389_473x282.jpg)
> #### 1>创建窗口
组件>列表框1个,按钮2个,图片框1个
* * * * *
> #### 2>创建子程序
![](https://box.kancloud.cn/3a2e3a431a5ff8f45e43bc19b6fece83_379x343.png)
![](https://box.kancloud.cn/fdd017a2cc18036d8b25b34925608210_356x239.png)
* * * * *
> #### 3>按钮事件
![](https://box.kancloud.cn/3ae8fa5d7d6ee3102e2d54025a506585_396x214.png)
![](https://box.kancloud.cn/5217fe5cabd55002759ef75d17fd1ef0_461x192.png)
* * * * *
4>子_冒泡排序 (手动复制↓↓)
~~~
.版本 2
.子程序 子_冒泡排序
.参数 参文本数组, 文本型, 数组
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 临时文本, 文本型
.变量循环首 (取数组成员数 (集文本数组), 2, -1, j)
.计次循环首 (j - 1, i)
.如果真 (参文本数组 [i] > 参文本数组 [i + 1])
临时文本 = 参文本数组 [i]
参文本数组 [i] = 参文本数组 [i + 1]
参文本数组 [i + 1] = 临时文本
.如果真结束
.计次循环尾 ()
.变量循环尾 ()
~~~