我认为楼主至目前为止是国内顶尖的 SQL 语言大师，如果再提高一步玩花哨，你只用一条 Select SQL 语句，把汇总和排名写出来，教教我们，可以吗？
你行的，你最棒。

[ 本帖最后由 aaaaaa 于 2015-9-10 11:32 编辑 ]

楼主，可以了吗？我知道你行的。你是最棒的！点赞。

这样吧，我先做一些基础工作，构造样本数据，假设有20个学校，每校500人，只统计语文成绩。
汇总出：代码, 学校, 人数, 语文平均分, 语文优秀数, 语文及格数, 语文优秀率, 语文及格率, 最高分, 最低分 和 排名。
排名是可选的：
按学校代码从高到低排列
按学校代码从低到高排列
按语文平均分名次从高到低排列
按语文平均分名次从低到高排列
按语文优秀分名次从高到低排列
按语文优秀分名次从低到高排列

要求只容许一句 Selece SQL 语句
据说此类题至少可以有三种做法：
Select Sum()...... From ......
Select ...... From (Select......)......
Select ...... Join Select ...... From ......
应该不止这些，楼主老师，我说的对吗？

构造样本数据的代码如下：

Clear
Close Databases
Create Cursor 成绩汇总表 ( 学校 C (10), 代码 C (6), 考生 C(6), 语文 I )

*!*    构造样本数据，假设有20个学校，每校500人，只统计语文成绩
gnPassMark =  72  && 语文及格分数
gnFineMark = 102  && 语文优秀分数
*
gnLower    =  50  && 语文最低分
gnUpper    = 120  && 语文满分分数

=Rand(-1)
For I = 1 To 20  && 有20个学校
    For J = 101 To 600  && 每校500人
        Insert Into 成绩汇总表 Values( ;
        "第" + Transform(I, "@LR 99") + "中学", ;           && 学校
        Transform(I, "@LR 999999"), ;                       && 学校代码
        Transform(Int(Rand( )* 100000), "@LR 999999"), ;    && 考生编号
        Int((gnUpper - gnLower + 1) * Rand( ) + gnLower) )  && 语文分数
    Endfor
Endfor

最后的结果是：



谢谢您，楼主，谢谢大家老师。

[ 本帖最后由 aaaaaa 于 2015-9-11 19:32 编辑 ]

特别强调：20个学校 x 每校500人 = 10,000条记录
汇总必须秒杀。
如果 10W 条记录的汇总不秒杀，那是糟蹋了 VFP。

我是学生，不会做这样的高难度题目，请楼主老师一定帮我。

谢谢您！

[ 本帖最后由 aaaaaa 于 2015-9-11 19:49 编辑 ]

“秒杀”和“分杀”的区别就真的很大吗？

这是看对象的：
像我这样的菜鸟，时杀、日杀都难办到；
像楼主这样的大牛，秒杀不在话下。

这就是区别。

我最最崇拜楼主

我先来吧。明天再来下一个。
统计出 : 代码, 学校, 人数, 语文平均分, 语文优秀数, 语文及格数, 语文不及格数, 语文优秀率, 语文及格率, 最高分, 最低分, 平均分名次
选择 : 按语文平均分名次从高到低排列，其他的排列次序看注释。
请楼主老师斧正！谢谢您。

1. 构造样本数据，如果已经有了相对应的 DBF 文件，这一步可以省略 :
Create Cursor 成绩汇总表 ( 学校 C (10), 代码 C (6), 考生 C(6), 语文 I )

*!*    构造样本数据，假设有20个学校，每校500人，只统计语文成绩
gnPassMark =  72  && 语文及格分数
gnFineMark = 102  && 语文优秀分数
*
gnLower    =  50  && 语文最低分
gnUpper    = 120  && 语文满分分数
*
=Rand(-1)
For I = 1 To 20  && 有20个学校
    For J = 101 To 600  && 每校500人
        Insert Into 成绩汇总表 Values( ;
        "第" + Transform(I, "@LR 99") + "中学", ;           && 学校
        Transform(I, "@LR 999999"), ;                       && 学校代码
        Transform(Int(Rand( )* 100000), "@LR 999999"), ;    && 考生编号
        Int((gnUpper - gnLower + 1) * Rand( ) + gnLower) )  && 语文分数
    Endfor
Endfor


2. 用一条 Select - SQL 语句 :
Select 代码, 学校, 人数, 语文 As 语文平均分, 语文优秀数, 语文及格数, ;
    语文不及格数, 语文优秀率, 语文及格率, 最高分, 最低分, ;
    ( Select 1 + Count(语文) From (Select 代码, 学校, Count (*) As 人数, ;
    Round(Avg(语文) + 0.00, 2) As 语文, ;
    Sum(Iif(语文>=102,1,0)) As 语文优秀数, ;
    Sum(Iif(语文>= 72,1,0)) As 语文及格数, ;
    Sum(Iif(语文 < 72,1,0)) As 语文不及格数, ;
    Round(Sum(Iif(语文>=102,1,0))/Count (*)*100, 2) As 语文优秀率, ;
    Round(Sum(Iif(语文>= 72,1,0))/Count (*)*100, 2) As 语文及格率, ;
    Max(语文) As 最高分, Min(语文) As 最低分 ;
    From 成绩汇总表 Group By 代码, 学校) As t1 Where 语文 > T2.语文) As 平均分名次 ;
    From (Select 代码, 学校, Count (*) As 人数, Round(Avg(语文) + 0.00, 2) As 语文, ;
    Sum(Iif(语文>=102,1,0)) As 语文优秀数, Sum(Iif(语文>=72,1,0)) As 语文及格数, ;
    Sum(Iif(语文 < 72,1,0)) As 语文不及格数, ;
    Round(Sum(Iif(语文>=102,1,0))/Count (*)*100, 2) As 语文优秀率, ;
    Round(Sum(Iif(语文>= 72,1,0))/Count (*)*100, 2) As 语文及格率, ;
    Max(语文) As 最高分, Min(语文) As 最低分 ;
    From 成绩汇总表 Group By 代码, 学校) As t2 ;
    Order By 语文平均分 Desc  && 按语文平均分名次从高到低排列
*!*    排列次序 ：
*!*        Order By 代码 Desc        && 按学校代码从高到低排列
*!*        Order By 代码             && 按学校代码从低到高排列
*!*        Order By 语文平均分 Desc  && 按语文平均分名次从高到低排列
*!*        Order By 语文平均分       && 按语文平均分名次从高到低排列
*!*        Order By 语文优秀分 Desc  && 按语文优秀分名次从高到低排列
*!*        Order By 语文优秀分       && 按语文优秀分名次从高到低排列

用 Select Sum()......From Table......Group By ...... 单联的算法应该比上面的较简洁，长度只有第一种算法长度的一半。
用 Join 的算法比较麻烦，还在构思当中。

[ 本帖最后由 aaaaaa 于 2015-9-13 19:43 编辑 ]

我开个玩笑，你表介意。

您说的本来就没什么问题，我经常看到你给别人解答问题。。