就是，不好意思啊，我下载的是3楼的附件

CLOSE DATABASES
USE  T2
LOCAL kkb,kkc ,kkd
for kk=1 to 10
       kkb =subs("语文 数学 英语 物理 化学 生物 政治 历史 地理 总分",kk*5-4,4)
       kkc =subs("yw sx yy wl hx sw zz ls dl zf",kk*3-2,2)
kkd=kkc+'zm'
kkc=kkc+'bm'
 ?  kkb,kkc,kkd
alter table t2 add &kkd NUM(4,0) &&增加字段
alter table t2 add &kkc NUM(4,0) &&增加字段
update t2 set &kkd=(select count(a.姓名)+ 1 from T2 as a where a.&kkb>T2.&kkb)
update t2 set &kkc=(select count(a.姓名)+ 1 from T2 as a where a.&kkb>T2.&kkb and a.班级= T2.班级)
endfor

学习了，建立新字段循环非常简洁高效，值得我学习消化，但是这样同分数名次不相同啊，一般同分名次是相同的，如何进一步解决这个问题

怎么好像楼主换人了啊？到底谁是提问者

我也是爬论坛的学习者

也不知道结果对不对，纯凑个热闹。

圣诞大战-詹姆斯17分塔图姆28+11 浓眉空砍40分湖人负绿军

[此贴子已经被作者于2023-12-26 11:53编辑过]

17楼老师，十分正确，老师有代码吗？发上来我拜读学习一下，可以吗？

老师，十分正确，老师有代码吗？发上来我拜读学习一下，可以吗？

数据库不用SQL不是浪费了吗
&&班级名次
SELECT 学号,SUBSTR(学号,3,2) 班级,姓名,语文,00000 as 语文班级名次 FROM cj ORDER BY 班级,语文 DESC INTO CURSOR 语文班级名次 READWRITE
UPDATE 语文班级名次 SET 语文班级名次 = RECNO()
UPDATE 语文班级名次 SET 语文班级名次 = RECNO()-启始 from (SELECT 班级,MIN(语文班级名次)-1 启始 FROM 语文班级名次 GROUP BY 班级) A WHERE 语文班级名次.班级=A.班级
&&全校名次
SELECT 学号,SUBSTR(学号,3,2) 班级,姓名,语文,00000 as 语文全校名次 FROM cj ORDER BY 语文 DESC INTO CURSOR 语文全校名次 READWRITE
UPDATE 语文全校名次 SET 语文全校名次 = RECNO()
只写了语文的，其他类似，最后更新也好，JOIN联接也好