> ## 实例：选择排序  > #### 1>创建窗口 　组件>列表框1个,按钮2个,图片框1个 * * * * * > #### 2>创建子程序   * * * * * > #### 3>按钮事件   * * * * * > #### 4>子_冒泡排序 （手动复制↓↓） ~~~ .版本 2 .子程序 子_选择排序 .参数 参文本数组, 文本型, 数组 .局部变量 元素个数, 整数型 .局部变量 j, 整数型 .局部变量 最小文本, 文本型 .局部变量 最小索引, 整数型 .局部变量 i, 整数型 元素个数 ＝ 取数组成员数 (参文本数组) .计次循环首 (元素个数 － 1, j) 最小文本 ＝ 参文本数组 [j] 最小索引 ＝ j .变量循环首 (j ＋ 1, 元素个数, 1, i) .如果真 (最小文本 ＞ 参文本数组 [i]) 最小文本 ＝ 参文本数组 [i] 最小索引 ＝ i .如果真结束 .变量循环尾 () .如果真 (最小索引 ≠ j) 参文本数组 [最小索引] ＝ 参文本数组 [j] 参文本数组 [j] ＝ 最小文本 .如果真结束 .计次循环尾 () ~~~