精易模块 文本_文本数组排序 错误排序

youle0

.版本 2
.支持库 spec

.子程序 _按钮3_被单击
.局部变量 参数数组, 文本型, , "0"
.局部变量 数组, 文本型, , "0"


加入成员 (参数数组, “fo”)
加入成员 (参数数组, “fi”)
文本_文本数组排序 (参数数组, 数组, )
调试输出 (数组)



结果是
* 数组:2{“fo”,“fi”}

应该是数组:2{“fi”,“fo”}

曙天

支持下，加油

cuige6

支持下，加油

18883767808

默默支持下！！！！

kyxx520

6666666666666

youle0

我后来在发现很早4.x版本就有人发现，为什么到现在这个bug还存在 ，难道要每个人都自己去编译模块源码吗。

后来用了坛友的冒泡文本排序 解决了

幻梦幽痕

默默支持下！！！！

Cand

  

子程序名	返回值类型	公开	备 注
文本_文本数组排序			排序从z到a排序或从a-z排序
参数名	类 型	参考	可空	数组	备 注
要排序的数组	文本型
排序后的数组	文本型
排序方向是否为从a到z	逻辑型				如果参数值为真，排序将从z到a排序。如果本参数被省略，将从a-z排序

变量名	类 型	静态	数组	备 注
局_计次	整数型
局_数目	整数型
局_大计次	整数型

局_数目 ＝ 取数组成员数 (要排序的数组)
如果 (排序方向是否为从a到z)
变量循环首 (90, 65, -1, 局_大计次)
计次循环首 (局_数目, 局_计次)
如果真 (取代码 (到大写 (取文本左边 (要排序的数组 [局_计次], 1)), ) ＝ 局_大计次)
加入成员 (排序后的数组, 要排序的数组 [局_计次])
到循环尾 ()
如果真 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1) ≠ “” 且 取代码 (到大写 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1)), ) ＝ 局_大计次)
加入成员 (排序后的数组, 要排序的数组 [局_计次])

计次循环尾 ()
变量循环尾 ()

变量循环首 (65, 90, 1, 局_大计次)
计次循环首 (局_数目, 局_计次)
如果真 (取代码 (到大写 (取文本左边 (要排序的数组 [局_计次], 1)), ) ＝ 局_大计次)
加入成员 (排序后的数组, 要排序的数组 [局_计次])
到循环尾 ()
如果真 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1) ≠ “” 且 取代码 (到大写 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1)), ) ＝ 局_大计次)
加入成员 (排序后的数组, 要排序的数组 [局_计次])

计次循环尾 ()
变量循环尾 ()

.版本 2<br /> <br /> .子程序 文本_文本数组排序, , 公开, 排序从z到a排序或从a-z排序<br /> .参数 要排序的数组, 文本型, 数组<br /> .参数 排序后的数组, 文本型, 参考 数组<br /> .参数 排序方向是否为从a到z, 逻辑型, 可空, 如果参数值为真，排序将从z到a排序。如果本参数被省略，将从a-z排序<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_数目, 整数型<br /> .局部变量 局_大计次, 整数型<br /> <br /> 局_数目 ＝ 取数组成员数 (要排序的数组)<br /> .如果 (排序方向是否为从a到z)<br />     .变量循环首 (90, 65, -1, 局_大计次)<br />         .计次循环首 (局_数目, 局_计次)<br />             .如果真 (取代码 (到大写 (取文本左边 (要排序的数组 [局_计次], 1)), ) ＝ 局_大计次)<br />                 加入成员 (排序后的数组, 要排序的数组 [局_计次])<br />                 到循环尾 ()<br />             .如果真结束<br />             .如果真 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1) ≠ “” 且 取代码 (到大写 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1)), ) ＝ 局_大计次)<br />                 加入成员 (排序后的数组, 要排序的数组 [局_计次])<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .变量循环尾 ()<br /> <br /> .否则<br />     .变量循环首 (65, 90, 1, 局_大计次)<br />         .计次循环首 (局_数目, 局_计次)<br />             .如果真 (取代码 (到大写 (取文本左边 (要排序的数组 [局_计次], 1)), ) ＝ 局_大计次)<br />                 加入成员 (排序后的数组, 要排序的数组 [局_计次])<br />                 到循环尾 ()<br />             .如果真结束<br />             .如果真 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1) ≠ “” 且 取代码 (到大写 (取声母 (取文本左边 (要排序的数组 [局_计次], 2), 1)), ) ＝ 局_大计次)<br />                 加入成员 (排序后的数组, 要排序的数组 [局_计次])<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .变量循环尾 ()

Cand

我去找找他的源码看看

hackerc

回个贴