按总分成绩重新分学号
按总分成绩重新分学号程序代码:
USE OK_WK set order to 班级 nbj=1 SCAN if 班级!=nbj store 1 to i endif REPLACE 姓名 with 班级+padl(i,2,"0") i=i+1 nbj=班级 ENDSCAN
OK_WK.rar
(13.97 KB)
ALLTRIM(STR(班级))+PADL(i,2,"0")