看样子楼主从昨天到现在还没睡觉吧？不知道又在那

从楼主最后一次回帖到现在已经三个小时了，楼主又在那忙了？

USE ee
INDEX ON VAL(班级)*100000+1-总分 to my_index
Nbj=班级
Nzf=总分
n=1
FOR i=1 to RECCOUNT()
    REPLACE 班级名次 with n
    SKIP
    IF 班级=Nbj .and. 总分<>Nzf
        n=n+1
    ENDIF
    IF 班级<>Nbj
        n=1
    ENDIF
    Nbj=班级   
    Nzf=总分
NEXT
 

分数相同的情况下，名次如何排？

这个简单呀，再加一层循环就解决问题了！

速度？

速度不是问题！

以下是完整的处理程序，其实非常简单的，用两循环就行了，不要自己把问题搞的太复杂！

USE ee
INDEX on 班级+STR(1000-总分) TO bjzf   && 以下为处理班级名次
 GO TOP
  DO whil NOT EOF()
    bj=班级
    i=1
    DO whil NOT EOF() AND 班级=bj
     zf=总分
     REPLACE 班级名次 WITH i
     SKIP
    IF 总分=zf
     REPLACE 班级名次 WITH i
    ELSE
     i=i+1
    ENDIF
   ENDDO
  ENDDO  && 以上为处理班级名次
  
  INDEX on STR(1000-总分) TO bjzf  && 以下为处理年级名次  
   GO TOP
  
    i=1
    DO whil NOT EOF()
     zf=总分
     REPLACE 年级名次 WITH i
     SKIP
    IF 总分=zf
     REPLACE 年级名次 WITH i
    ELSE
     i=i+1
    ENDIF   
  ENDDO  && 以上为处理年级名次

看看，是不是解决问题了！

贴个图看看效果