| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1313 人关注过本帖
标题:请教特殊的排序
只看楼主 加入收藏
fdxxhjc
Rank: 1
等 级:新手上路
帖 子:305
专家分:0
注 册:2014-4-10
结帖率:73.44%
收藏
已结贴  问题点数:20 回复次数:9 
请教特殊的排序
请教先生,有一个53行24列的原表,第一列按升序,第二列以前一列即第一列以按升序排好的为标准,将第一列中"相同数值的段"分别按升序排列来排第二列,第三列以前一列即已排好的第二列为标准,将第二列中"相同数值的段"分别按升序排列来排第三列,以此类推,直至最后列排好为止。为表达更清楚些,以下举6行3列的例补充以上文字的不确切:
     原表        排成结果
 5   1   9      4   1   7
 4   2   3      4   2   3
 6   8   7      4   2   4
 4   1   7      5   1   9
 4   2   4      6   8   3
 6   8   3      6   8   7

附件:
原表.zip (2.23 KB)
                           
2016-11-07 16:04
pjtyzyq
Rank: 4
等 级:业余侠客
威 望:6
帖 子:232
专家分:240
注 册:2016-2-14
收藏
得分:0 
USE  原表
DIMENSION  aa(53)
FOR j=1 TO 53
FOR i=1 TO 24
i_1=LTRIM(STR(i,2))
IF a&i_1<10 THEN
a_1="0"+STR(a&i_1,1)
ELSE
a_1=STR(a%i_1,2)
ENDIF
=aa(j)+a_1
ENDFOR
ENDFOR
ASORT( aa )
FOR j=1 TO 53
FOR i=1 TO 24
i_1=LTRIM(STR(i,2))
REPLACE a&i_1 WITH VAL(SUBSTR(aa(j),i*2-1,2))
ENDFOR
ENDFOR

未测试,程序也不一定正确,只是提供一个个人的思路。
2016-11-07 16:34
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:10 
select * from 原表 order by a1,a2,......,a23,a24

坚守VFP最后的阵地
2016-11-07 16:35
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:10 
举例的结果就是按“1列”+“2列”+“3列”索引的结果。
2016-11-07 17:45
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
USE 原表
INDEX ON STR(A1,2)+STR(A2,2)+......+STR(A23,2)+STR(A24,2) TO SY
GO TOP
BROWSE

坚守VFP最后的阵地
2016-11-07 18:55
fdxxhjc
Rank: 1
等 级:新手上路
帖 子:305
专家分:0
注 册:2014-4-10
收藏
得分:0 
回复 5楼 sdta
先生您好,我依您之法,运行后提示:"索引表达式超出最大长度"
2016-11-07 20:56
fdxxhjc
Rank: 1
等 级:新手上路
帖 子:305
专家分:0
注 册:2014-4-10
收藏
得分:0 
回复 4楼 吹水佬
是的先生
2016-11-07 20:57
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用fdxxhjc在2016-11-7 20:56:45的发言:

先生您好,我依您之法,运行后提示:"索引表达式超出最大长度"

3楼的代码试了吗

坚守VFP最后的阵地
2016-11-07 21:36
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
以下是引用fdxxhjc在2016-11-7 20:56:45的发言:

先生您好,我依您之法,运行后提示:"索引表达式超出最大长度"
试试3楼的代码
2016-11-07 22:05
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
3楼之法最好

只求每天有一丁点儿的进步就可以了
2016-11-08 08:19
快速回复:请教特殊的排序
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.045103 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved