回复 7楼 muyubo
我已经按随机排序了,只不过要求测试相同项目(A\B\C\D\E\F)要挨着
回复 6楼 吹水佬
我想达到这样的效果,选测项目(xcxm)为A的每10人一组(座号),场次根据测试人数有A001,A002等,选测项目为B\C\D\E\F等的依次类推。
[ 本帖最后由 chychychy 于 2015-5-26 21:39 编辑 ]
zwh=1 kch=1 USE 中学 GO 1 cc_1=ALLTRIM(xcxm) Scan IF ALLTRIM(cc_1)<>ALLTRIM(xcxm) cc_1=ALLTRIM(xcxm) zwh=1 kch=1 ENDIF Replace 座号 With zwh Replace 场次 With allt(cc_1)+Padl(kch,3,[0]) zwh=zwh+1 If zwh>10 zwh=1 kch=kch+1 ENDIF ENDSCAN use
zwh=1 kch=1 USE 中学 GO 1 cc_1=ALLTRIM(xcxm) &&设定变量cc_1取得字段xcxm的值 Scan IF ALLTRIM(cc_1)<>ALLTRIM(xcxm) &&如果字段xcxm有变化,如从"A"变成"B" cc_1=ALLTRIM(xcxm) &&变量cc_1就等于变化后的值 zwh=1 &&座号从1开始 kch=1 &&场次从1开始 ENDIF Replace 座号 With zwh Replace 场次 With allt(cc_1)+Padl(kch,3,[0]) zwh=zwh+1 If zwh>10 zwh=1 kch=kch+1 ENDIF ENDSCAN use