合规国际互联网加速 OSASE为企业客户提供高速稳定SD-WAN国际加速解决方案。 广告
> ## 实例:递归冒泡排序 ![](https://box.kancloud.cn/dada2e645074ac121e0952f4aca404c3_473x282.png) > #### 1>创建窗口  组件>列表框1个,按钮2个,图片框1个 * * * * * > #### 2>创建子程序 ![](https://box.kancloud.cn/106c54c46bced5df72b6d682873e80d0_346x410.png) ![](https://box.kancloud.cn/fdd017a2cc18036d8b25b34925608210_356x239.png) * * * * * > #### 3>按钮事件 ![](https://box.kancloud.cn/3ae8fa5d7d6ee3102e2d54025a506585_396x214.png) ![](https://box.kancloud.cn/9c9f5652717b7531eaff89f7dfa4b7d0_467x196.png) * * * * * > #### 4>子_冒泡排序 (手动复制↓↓) ~~~ .版本 2 .子程序 子_递归冒泡排序 .参数 参文本数组, 文本型, 数组 .参数 参最后位置, 整数型, 可空 .局部变量 i, 整数型 .局部变量 临时文本, 文本型 .如果真 (是否为空 (参最后位置)) 参最后位置 = 取数组成员数 (参文本数组) .如果真结束 .如果真 (参最后位置 < 2) 返回 () .如果真结束 .计次循环首 (参最后位置 - 1, i) .如果真 (参文本数组 [i] > 参文本数组 [i + 1]) 临时文本 = 参文本数组 [i] 参文本数组 [i] = 参文本数组 [i + 1] 参文本数组 [i + 1] = 参文本数组 [i] .如果真结束 .计次循环尾 () 子_递归冒泡排序 (参文本数组, 参最后位置 - 1) ~~~