假设表的bch字段有A、B、C三个单位，要求这三个单位的人员进行排序后相邻的两个人不是同一单位的，请问怎样写代码？

在我自己的电脑上效果图没有显示出来。

另外字段 有 xm 等

先将人员按单位分组，然后依次每个单位抽取一个进行排队。

由于各单位人数不一，这样最终会出现同单位人员排在一起的情况，如果一个单位远远超出其他单位，后面就全部是这个单位的人了

如果某个单位的人数比另外2个单位的人数和还要多，那么同一个单位的人员编排在一起，是不可避免的！
否则的话，可以把人数少的2单位当作1个单位，这样相当于2个单位了，再在2个里面编排。

A、B、C单位的人数按照从小到大的顺序排列分别为X1、X2、X3，如果X1+X2+1<X3则不可达成楼主所说的同单位的人不能安排在一起的要求。先按人数为X3的单位排序，如10、20、...每两个记录之间预留一些插入别的记录的空间，然后对余下的数据安插在中间

在EXCEL中我也是按版主SZY345的方法编排的，只是在VFP程序中因为单位数不是固定的、各单位人数也不是固定的，我感觉代码编写起来比较复杂

select 000 as no,dw,xm from table1 order by dw into curs tmp1
select tmp1
go top
do while not eof()
 pdw=dw
 pno=1
 do while dw=pdw
  repl no with pno
  pno=pno+1
  skip
 enddo
enddo
select no,dw,xm from tmp1 order by no

[[it] 本帖最后由 pgshui 于 2008-10-31 14:36 编辑 [/it]]

上面程序只是把单位分组

我想按以下思路编排：
   在表单中把选出来的单位放到表格中，在表格中对选出的单位根据人数分组，假设选出A、B、C三单位，人数分别为10、15、20，把人数少的A、B二单位作为一组，C作为一组，先把AB二单位交叉排序，但B单位最后5人还是连在一起，于是再把AB这一组反转来排序（排在最后的放到最前面来），最后与C单位交叉排序，就不会出现同一单位人员的记录连在一起的现象了。