递归火山软件开发平台

标题: 超级列表框排序 [打印本页]

作者: 359321852 时间: 2021-3-26 21:48
标题: 超级列表框排序
本帖最后由 359321852 于 2021-3-26 21:49 编辑

超级列表框排序，本办法，请高手优化！
(, 下载次数: 729)

(, 下载次数: 718)
(, 下载次数: 68)

作者: zhqyong 时间: 2022-6-9 13:44

作者: zhqyong 时间: 2022-6-9 13:51
1、把第105、106行去掉；
2、加返回值；

作者: ss4680 时间: 2026-3-30 17:11
出现第一项丢失  最后一项重复的情况
找deepseek修改了一下
<火山程序类型 = "通常" 版本 = 1 />
循环 (0, 排序数组.取成员数 (), i, 1)
{
j = i
判断循环 (j > 0)
{
      如果 (从小到大 == 真)
      {
         如果 (排序数组.取成员 (j) < 排序数组.取成员 (j - 1))
         {
            排序数组.交换成员 (j, j - 1)
            表项值数组.交换成员 (j, j - 1)
            j = j - 1
         }
         否则
         {
            跳出循环
         }
      }
      否则
      {
         如果 (排序数组.取成员 (j) > 排序数组.取成员 (j - 1))
         {
            排序数组.交换成员 (j, j - 1)
            表项值数组.交换成员 (j, j - 1)
            j = j - 1
         }
         否则
         {
            跳出循环
         }
      }
}
}

欢迎光临递归火山软件开发平台 (https://bbs.voldp.com/)