sele yzxx
go top
i=1
j=1
do while not eof()
if j<=30
repl kc with i,zh with j
j=j+1
else
i=i+1
j=1
if j<=30
repl kc with i,zh with j
j=j+1
ENDIF
endif
SELECT yzxx
skip
ENDDO
VFP自动编排考场座号小程序
最新推荐文章于 2022-07-18 16:31:51 发布
sele yzxx
go top
i=1
j=1
do while not eof()
if j<=30
repl kc with i,zh with j
j=j+1
else
i=i+1
j=1
if j<=30
repl kc with i,zh with j
j=j+1
ENDIF
endif
SELECT yzxx
skip
ENDDO