排序的问题...

小白到此 · 发表于 2024-8-9 23:53:08

请教大佬，按源码里的售价由高到低降序怎么改呀

真冬 · 发表于 2024-8-9 23:53:09

子程序名	返回值类型	公开	备注
更新超级列表框

变量名	类型	静态	数组	备注
i1	整数型
表项索引	整数型

' 超级列表框1.全部删除 ()
选择框1.标题＝ “从高到低”

如果真 (选择框1.选中)

子程序1类别倒序 ()

计次循环首 (取数组成员数 (集商品们), i1)

判断 (i1 ＞超级列表框1.取表项数 ())

表项索引＝超级列表框1.插入表项 (, 到文本 (集商品们 [i1].编号), , , , i1)

表项索引＝ i1 － 1

超级列表框1.置标题 (表项索引, 1, 集商品们 [i1].品名)

超级列表框1.置标题 (表项索引, 2, 集商品们 [i1].类别)

超级列表框1.置标题 (表项索引, 3, 到文本 (集商品们 [i1].售价))

超级列表框1.置标题 (表项索引, 4, 集商品们 [i1].产地)

计次循环尾 ()

子程序名	返回值类型	公开	备注
子程序1类别倒序

变量名	类型	静态	数组	备注
i1头	整数型
a	文本型
总数	整数型
i2尾	整数型
i3	整数型

总数＝取数组成员数 (集商品们)

循环判断首 ()

i1头＝ i1头＋ 1

a ＝集商品们 [i1头].类别

变量循环首 (i1头＋ 1, 总数, 1, i2尾)

如果真 (a ≠ 集商品们 [i2尾].类别)

i2尾＝ i2尾－ 1

跳出循环 ()

变量循环尾 ()

如果真 (i2尾 ≤ 总数)

变量循环首 (i1头, i1头 �� (i2尾－ i1头) ÷ 2, 1, i3)

交换变量 (集商品们 [i3], 集商品们 [i2尾 �� (i3 － i1头)])

变量循环尾 ()

i1头＝ i2尾

循环判断尾 (i1头 ≠ 总数)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br />
.支持库 iext<br />
<br />
.子程序 更新超级列表框<br />
.局部变量 i1, 整数型<br />
.局部变量 表项索引, 整数型<br />
<br />
' 超级列表框1.全部删除 ()<br />
选择框1.标题 ＝ “从高到低”<br />
.如果真 (选择框1.选中)<br />
    子程序1类别倒序 ()<br />
.如果真结束<br />
.计次循环首 (取数组成员数 (集商品们), i1)<br />
    .判断开始 (i1 ＞ 超级列表框1.取表项数 ())<br />
        表项索引 ＝ 超级列表框1.插入表项 (, 到文本 (集商品们 [i1].编号), , , , i1)<br />
    .默认<br />
        表项索引 ＝ i1 － 1<br />
    .判断结束<br />
<br />
    超级列表框1.置标题 (表项索引, 1, 集商品们 [i1].品名)<br />
    超级列表框1.置标题 (表项索引, 2, 集商品们 [i1].类别)<br />
    超级列表框1.置标题 (表项索引, 3, 到文本 (集商品们 [i1].售价))<br />
    超级列表框1.置标题 (表项索引, 4, 集商品们 [i1].产地)<br />
.计次循环尾 ()<br />
<br />
.子程序 子程序1类别倒序<br />
.局部变量 i1头, 整数型<br />
.局部变量 a, 文本型<br />
.局部变量 总数, 整数型<br />
.局部变量 i2尾, 整数型<br />
.局部变量 i3, 整数型<br />
<br />
总数 ＝ 取数组成员数 (集商品们)<br />
.循环判断首 ()<br />
    i1头 ＝ i1头 ＋ 1<br />
    a ＝ 集商品们 [i1头].类别<br />
    .变量循环首 (i1头 ＋ 1, 总数, 1, i2尾)<br />
        .如果真 (a ≠ 集商品们 [i2尾].类别)<br />
            i2尾 ＝ i2尾 － 1<br />
            跳出循环 ()<br />
        .如果真结束<br />
<br />
    .变量循环尾 ()<br />
    .如果真 (i2尾 ≤ 总数)<br />
        .变量循环首 (i1头, i1头 ＋ (i2尾 － i1头) ÷ 2, 1, i3)<br />
            交换变量 (集商品们 [i3], 集商品们 [i2尾 － (i3 － i1头)])<br />
        .变量循环尾 ()<br />
        i1头 ＝ i2尾<br />
    .如果真结束<br />
<br />
.循环判断尾 (i1头 ≠ 总数)

补充内容 (2024-8-10 00:58):
原理是找到类别的最小和最大价格的位置，然后第一和倒数第一交换，第二和倒数第二交换，第三和倒数第三交换。。。。如此这般就能把顺序倒过来