面试考场编排
新建文件夹 (2).rar
(106.71 KB)
考场编排,不同时间段,不同科目,人数不同,如何完成Word文件考场分组统计表要求(图1),从论坛学习后了做了个测试,但只会一点,能完成一次考试的如图2。全部完成不会了,请帮助。
CLEAR
SELECT 2
fn1=GETFILE('dbf','打开分组表')
USE (fn1) ALIAS g1sz
SELECT 1
fn2=GETFILE('dbf','打开考场表')
USE (fn2) ALIAS gz
select kch,kcrs from g1sz into array akcxx
select 1
go top
for i=1 to alen(akcxx,1)
for j=1 to akcxx[i,2]
replace 组别 with akcxx[i,1],序号 with j
if not eof()
skip 1
else
exit
endif
endfor
if eof()
exit
endif
endfor
browse
[此贴子已经被作者于2023-3-24 23:49编辑过]