zwh=1
kch=1
Scan
   if xcxm='A'
      Replace 座号 With zwh      
      Replace 场次 With 'A'+Padl(kch,3,[0])   
      zwh=zwh+1
        If zwh>10
          zwh=1
          kch=kch+1
          Endif
     ELSE xcxm='B'  
      Replace 座号 With zwh      
      Replace 场次 With 'A'+Padl(kch,3,[0])   
      zwh=zwh+1
        If zwh>10
          zwh=1
          kch=kch+1
          Endif
   ENDIF
Endscan

我想根据xcxm 一栏随机生成场次和座号，10人为一组（座号1-10），场次中的字母和xcxm中的一致。可是我的代码执行完如上图，不正确，请帮助修改。

我现在的代码执行结果没有去判断xcxm为A B C 等情况分别执行，肯定是循环不对，请指教

[ 本帖最后由 chychychy 于 2015-5-25 18:05 编辑 ]

我已经按随机排序了，只不过要求测试相同项目（A\B\C\D\E\F)要挨着

我想达到这样的效果，选测项目（xcxm）为A的每10人一组（座号），场次根据测试人数有A001，A002等，选测项目为B\C\D\E\F等的依次类推。

[ 本帖最后由 chychychy 于 2015-5-26 21:39 编辑 ]

那应该怎样A条件执行B条件C条件D条件E条件F条件等等去执行呢？

谢谢，你一个简单的if就解决了。我就是没想通应该如何循环判断执行，学习了。我先生成了一随机数，然后按照xcxm 和随机数排序得到的。 ALLTRIM(cc_1)<>ALLTRIM(xcxm)这句其什么作用？随机的过程也应该是全部放到程序里完成才对。我继续学习。

[ 本帖最后由 chychychy 于 2015-5-26 22:54 编辑 ]