USE 表文件
GO TOP 
num = 1
class = 班级
FOR n = 1 TO RECCOUNT()
    REPLACE 考号 WITH '1'+PADL(班级,2,'0')+PADL(num,3,'0')  &&班级，如：101001。第二、三位是班号，后三位是编号，是吧
    SKIP
    IF class = 班级   &&如果下条记录还是和上条一个班，
        num = num + 1  &&考号继续往上加
    ELSE
        num = 1          &&否则 编号重新从1开始，
        class = 班级    &&为了判断下条是否一样
    ENDIF
ENDFOR     

考号是 6 位数的，第一位是代表年级，第二位是0，第三位是班级，四五六都是序号的

噢是这样啊，把你的表可以发上来吗？最起码看看 班级字段是什么内容吧

[em2]