分页小程序，foxpro

set talk off
t=1
go 1
do while .not.eof()
*!*    2210/6+1=369.3333333 记录数/每页记录数+1(也得凑够一整页)
if t>369
t=1
endif
repl ym with str(t,3,0)
skip
t=t+1
endd
*分别按照准考证号和考点出场顺序排序后操作本程序。
*按照yw排序后调用报表输出程序。

转载于:https://www.cnblogs.com/houweidong/archive/2013/03/24/2979720.html