以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于自动排序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151553)
--  作者：wugang0131
--  发布时间：2020/6/27 19:53:00
--  关于自动排序
比如一个班学生的成绩，在“名次”列自动给出每一名的学生的名次，在“等次”列，前十名的学生自动给予“优秀”等次，该如何实现？
请老师指教，谢谢！
--  作者：sloyy
--  发布时间：2020/6/28 0:46:00
--  
1 按 成绩 降序排序  
2  给名次赋值  
3 前10名 给等次赋值 "优秀" 
Tables("成绩表").sort="成绩 desc"
DIM N AS Integer=1
for EACH R AS ROW IN  tables("成绩表").ROWS 
R("成绩")=N
IF N<=10 THEN
R("等次")="优秀"
end if
N=N+1
NEXT 
--  作者：wugang0131
--  发布时间：2020/6/28 10:01:00
--  
谢谢老师！