高级表格排序纯手打，无模块，多个循环

秀才遇到兵 · 发表于 2017-4-1 22:47:45

纯手打，也是看到有人发了需求才写的这个，比较简单，高手勿喷

只为相互学习，有好的方法欢迎大家一起讨论
我这里用了多个循环来实现的排序

.版本 2
.支持库 eGrid
.支持库 spec

.局部变量行数, 整数型
.局部变量列数, 整数型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 str, 文本型
.局部变量数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量临时数组, 整数型, , "0"
.局部变量临时组, 文本型, , "0"
.局部变量计次, 整数型
.局部变量导入数组, 文本型, , "0"
.局部变量 x1, 整数型
.局部变量 y1, 整数型

行数＝高级表格1.行数
列数＝高级表格1.列数
' 调试输出 (行数, 列数)

.计次循环首 (行数, x)
str ＝ “”
.计次循环首 (列数, y)
      str ＝ str ＋高级表格1.取数据 (x － 1, y － 1) ＋ “[]”
.计次循环尾 ()
加入成员 (数组, str)
.计次循环尾 ()
调试输出 (数组 [3])

.计次循环首 (取数组成员数 (数组), i)
临时组＝分割文本 (数组 , “[]”, )
' 调试输出 (取数组成员数 (临时组))
.如果真 (临时组 [3] ＝ “”)
      到循环尾 ()
.如果真结束
.如果真 (到整数 (临时组 [3]) ≤ 0)
      到循环尾 ()
.如果真结束
调试输出 (到整数 (临时组 [3]))
加入成员 (临时数组, 到整数 (临时组 [3]))
.计次循环尾 ()
数组排序 (临时数组, 真)  ' 如果想要从大到小排列 “真”改为“假”即可
调试输出 (临时数组)

清除数组 (临时组)

.计次循环首 (取数组成员数 (临时数组), 计次)
.如果真 (计次＞ 1)
      .如果真 (临时数组 [计次] ＝临时数组 [计次－ 1])
         到循环尾 ()
      .如果真结束

.如果真结束

.计次循环首 (取数组成员数 (数组), i)
      .如果真 (寻找文本 (数组 , 到文本 (临时数组 [计次]), , 假) ≠ -1)
         加入成员 (临时组, 数组 )
      .如果真结束

.计次循环尾 ()
.计次循环尾 ()

cpu1023 · 发表于 6 天前

正在找这个,不知道有没有用

spy1987 · 发表于 2024-7-30 15:09:37

好像不得行哦

羽木 · 发表于 2024-4-14 21:25:54

学习学习

布点脚本师 · 发表于 2023-11-8 09:06:45

学习学习学习

wang8679506 · 发表于 2023-10-22 16:26:42

好像不能排序字母和汉字

wang8679506 · 发表于 2023-10-22 16:24:16

学习学习

深居简出 · 发表于 2023-9-2 16:44:20

学习学习学习

yjtadw · 发表于 2023-4-2 09:41:29

试试吧哈哈

wed543 · 发表于 2023-4-2 00:28:31

谢谢分享

chenyongcheng · 发表于 2021-11-28 14:47:01

下载试试。。。。。。

		自动登录	找回密码
密码			注册

[易语言纯源码] 高级表格排序纯手打，无模块，多个循环

点评

评分

[易语言纯源码] 高级表格排序 纯手打，无模块，多个循环

点评

评分

[易语言纯源码] 高级表格排序纯手打，无模块，多个循环