比如我们一个高考考点，有32个考场，监考分组名单如下：


想法：
把这32组监考老师随机编排，并将结果按组号保存到抽签结果.dbf表中，
(或者是以其他什么方式保存起来)
第一科语文，第二科数学，第三科综合，第四科英语，

要求：在高考这两天考试中，同一组监考老师不能监考同一个考场。
抽签完成后，当场把当前科目的抽签结果打印出来，让监考老师们签字。

初步设计了一个表单界面，但程序设计的思路是什么，代码怎么写，感觉很复杂，实在是不会了，请高手指点一下了。







**这个考点是32场，第二个考点78场，第三个考点102场，感觉程序设计好了，考场多少都不会是问题，应该都能通用。

[此贴子已经被作者于2019-7-21 10:46编辑过]

这个监考员的分组搭配已经提前定好了，是固定的，一个组里，一个男的，一个女的，考试这两天这个组合不会变，这个不需要通过程序来进行搭配。
并且这三个考点分开独立进行抽签的，
每个考点只需把本好点的的监考分组表，导入到自己的程序中，然后进行本考点的抽签。

第一个考点是1-32场，第二个考点是33-109场，第三个考点是110-206考场。
程序的作用就是把这个监考人员的分组号和这个考场号进行随机编排。

[此贴子已经被作者于2019-7-21 13:32编辑过]

是的，是这个意思，但不知道怎么通过命令和程序来实现这些。

@ wengjl，谢谢老师的用心指导，我下载下来认真学习。

我把我们这原来用过的一个发上来，他这个是用Delphi编写的，也能用，就是不时不太稳定，想用VFP也实现这样的效果就好了。





他这个是用Delphi编写的，大家帮着分析一下他这个的思路是什么，用VF如果也能这样就好了。
附程序：

[此贴子已经被作者于2019-7-22 10:42编辑过]

是的，使用起来灵活一些最好，这得需要考务人员和编程人员共同研究，符合工作实际。


我们是高考大县，高考人数近8000人，考场近270个，高考的时间安排非常紧凑，现场让老师们拿筷子抽签是不现实的，时间根本不够，只能是采用电子抽签了。

高考人数少的县区，用老办法时间还可能来得及。

[此贴子已经被作者于2019-7-24 09:15编辑过]

监考名单设置2个字段，
组号+主监考员姓名

把抽签结果按组号排序，打印结果，这样更快找到自己那一组。

CLOSE DATABASES
SELECT 0
USE cqjg alia ap  &&打开表cqjg，指定别名为ap(安排)

SELECT 0
USE fz alia md &&打开表fz，指定别名为md（名单）
nrecc=RECCOUNT() &&指定nrecc的值为表fz的总记录数,作用可能是判断一下表中有多少组监考人员。

FOR i=1 to 4
  FOR j=1 to nrecc
    GO j
    REPLACE ('md.jkkm'+STR(i,1)) with allt(str(val(subs(time(),7))*rand()*39572468)) &&这一句的命令的意思是什么，麻烦老师讲解一下，我好写一些备注，防止过些日子忘记了。
  ENDFOR

另外这样安排的监考结果，会不会出现某些组老师，监考以前监过的考场。
比如，张三语文科目时监考的是第10场，到了英语科目时又监考第10场，
您设计的这个程序中有避免这个问题的命令代码吗？

[此贴子已经被作者于2019-7-25 10:23编辑过]

半途而废(>﹏<)
重复监考同一考场的问题没有解决。

[此贴子已经被作者于2019-8-13 13:10编辑过]

谢谢鼓励，继续努力研究，哈。