一个文本排序的问题

vimjay

阿里=43
阿狗=22
阿明=1
奥斯=18
啊偶=55

怎么从大到小排序=号后面的数字，并查出阿狗在排序后的第几位

mrzcpo

楼上的不对，这才是正解
demo.e (3.85 KB, 下载次数: 21)

2020-3-3 22:26 上传

点击文件名下载附件



补充内容 (2020-3-3 22:29):
[e=0].版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击
.局部变量 L_文本数组, 文本型, , "0"
.局部变量 L_排序数组, 整数型, , "0"
.局部变量 L_01, 整数型
.局部变量 L_TMP, 文本型
...

LYForever

~~~~~~~~

走一回

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
temp	整数型		0
xx	xx类型		5
n	整数型
xx2	xx类型		5

xx [1].姓名 ＝ “阿里”
xx [1].数值 ＝ 43
xx [2].姓名 ＝ “阿狗”
xx [2].数值 ＝ 22
xx [3].姓名 ＝ “阿明”
xx [3].数值 ＝ 1
xx [4].姓名 ＝ “奥斯”
xx [4].数值 ＝ 18
xx [5].姓名 ＝ “啊偶”
xx [5].数值 ＝ 55
清除数组 (temp)
计次循环首 (取数组成员数 (xx), i)
加入成员 (temp, xx [i].数值)
计次循环尾 ()
数组排序 (temp, 假)
计次循环首 (取数组成员数 (temp), i)
计次循环首 (取数组成员数 (xx), n)
如果真 (temp [i] ＝ xx [n].数值)
xx2 [i].姓名 ＝ xx [n].姓名
xx2 [i].数值 ＝ xx [n].数值

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (xx2), i)
调试输出 (xx2 [i].姓名, xx2 [i].数值)
如果 (xx2 [i].姓名 ＝ “阿狗”)
调试输出 (“阿狗  排在第” ＋ 到文本 (i))



计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 temp, 整数型, , "0"<br /> .局部变量 xx, xx类型, , "5"<br /> .局部变量 n, 整数型<br /> .局部变量 xx2, xx类型, , "5"<br /> <br /> xx [1].姓名 ＝ “阿里”<br /> xx [1].数值 ＝ 43<br /> <br /> xx [2].姓名 ＝ “阿狗”<br /> xx [2].数值 ＝ 22<br /> <br /> xx [3].姓名 ＝ “阿明”<br /> xx [3].数值 ＝ 1<br /> <br /> xx [4].姓名 ＝ “奥斯”<br /> xx [4].数值 ＝ 18<br /> <br /> xx [5].姓名 ＝ “啊偶”<br /> xx [5].数值 ＝ 55<br /> <br /> 清除数组 (temp)<br /> .计次循环首 (取数组成员数 (xx), i)<br />     加入成员 (temp, xx <i>.数值)<br /> .计次循环尾 ()<br /> 数组排序 (temp, 假)<br /> <br /> .计次循环首 (取数组成员数 (temp), i)<br />     .计次循环首 (取数组成员数 (xx), n)<br />         .如果真 (temp <i> ＝ xx [n].数值)<br />             xx2 <i>.姓名 ＝ xx [n].姓名<br />             xx2 <i>.数值 ＝ xx [n].数值<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (xx2), i)<br />     调试输出 (xx2 <i>.姓名, xx2 <i>.数值)<br />     .如果 (xx2 <i>.姓名 ＝ “阿狗”)<br />         调试输出 (“阿狗  排在第” ＋ 到文本 (i))<br />     .否则<br /> <br />     .如果结束<br /> <br /> .计次循环尾 ()

  

.xx类型 xx类型

数据类型名	公开	备 注
(未定义数据类型名)
成员名	类 型	传址	数组	备 注
姓名	文本型
数值	整数型

.版本 2<br /> <br /> .xx类型 xx类型<br />     .成员 姓名, 文本型<br />     .成员 数值, 整数型

LYForever

重写了一下，求采纳~~~~~~~~~~

冯古屋

关联xx进行排序.zip (1.67 KB, 下载次数: 8)

2020-3-3 23:02 上传

点击文件名下载附件

sinue9528

呵呵，出次排序吗？

陈道友

查查支持库手册或精易模块，应该有数组排序的