表：ksap.dbf
字段：xh(学号）
      xm（姓名）
      ksh（考室号）
      zwh（座位号）

要求先用随机函数每40人编排成一个考室（1，2……），再用随机函数生成每个考室考生的座位号（1－40）

请问怎样编程实现？

版主SZY345在QQ群上也给我提供了这个思路并写了示例代码，但是还有一个问题没有解决，因为总人数zrs%40<>0,假设178人，分作4个考室还余18人，这18个人安排到第5个考室，这18个人从1-18号怎样随机编排。
我用了一个很蛮的方法，把这18个人从原表删除并拷到另一个表中，对这个新表进行进行随机编号，但我发现用以下语句编号时总是有部分人员没有进行编排：
sele bb01
zrs=recc()
for i=1 to zrs
go int(rand()*(zrs)+1)
if ksh=''
repl ksh with '3',zwh with allt(str(i))
else
i=i-1
endif

衷心感谢！我马上去试试

OK了。我得好好琢磨一下。

思路有点像 抽奖 示例程序。 在程序中要设置 set dele on 。但抽奖程序没有用到循环，我这个程序要用到的循环条件，我还得好好想一想。