以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于自动排序  (http://www.foxtable.com/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
--  
谢谢老师!