妙，能解释一下吗？

当班级数不固定时，只修改n的值即可，不用修改代码中的数值，可以减少错误的发生率

replace all bj with iif(mod(zmc-1,2*n)<n,mod(zmc-1,n)+1,n-mod(zmc-1,n))
这条代码中共有5处n，如果此处不是n而是具体的值，当班级数不固定时，是不是要一个个修改，如果不认真的话，有可能漏掉某一处的值没修改，用变量n的好处是，只要修改n的值，可以避免修改5个地方的值。

想请教mod里面的含义及原理，谢谢。

根据16楼已解决记录超出问题，烦再请教在16楼基础上比如我想把前200名（当然不固定也可能是180名）分到实验班，剩下的人分到普通班，
如何加入一n变量，&&用男生测试写入可解决记录超出问题
sort on zf /d to tempnans for xb='男' &&男生临时数据库
&&sort on zf /d to tempnvs for xb='女' &&女生临时数据库
use
&&分男生
sele 1
use tempnans &&男生临时数据库

**n=1 &&设置记录定位变量，比如前200人分为4个班停止，剩下的人另分，
m=1 &&班数变量
 
GO TOP
do while not eof()
    && 正序
    m=1
        do while  not eof() and m<=6 &&最大班数
        repl bj with m
        m=m+1
        SKIP
        enddo
    &&倒序
    m=6
       do while  not eof() and m>=1
        repl bj with m
        m=m-1
        SKIP
        enddo
enddo
GO top
BROWSE
use目的是设置记录定位变量，可以通过控制n变量方便两次分配。比如前200人分为4个班停止，剩下的人另分，如何解决

* 前200名，是指总成绩排名？还是你表的顺序？
* 用SQL语句生成吧，控制前200名方便点
* 假如你表名是 D:\TEST\表1.dbf
use D:\TEST\表1.dbf in 0
* 生成成绩排名的前200名，表是 D:\TEST\表1_Top200.dbf
select top 200 * from 表1 order by zf desc into table D:\TEST\表1_Top200.dbf
* 对前200名进行分班
select 表1_Top200
* 下面的就是你前面学会的代码了。

ok，谢谢

select top 200 * from 表1 order by zf desc into table D:\TEST\表1_Top200.dbf
* Top 200 是前200
* order by zf desc 是用 zf 来排序，采用降序，也就最高的在第1位
* into table D:\TEST\表1_Top200.dbf 是生成1个新表表1_Top200.dbf，在 D:\TEST
* 如果生成临时表，可以用 into cursor 临时表名 readwrite,这样，这个临时表是可以修改的