不给样本数据怎么做？

没难度的，就是选择2条数据，然后把数据交换位置。
最简单的方法就是，分别把2条数据放到数组去，然后交换。
你这个，是交换班级资料，其他的不交换，

如下，是整个记录交换的列子。
CREATE CURSOR t1(a1 I,a2 I,a3 I)
FOR I=1 TO 10
INSERT INTO T1(A1,A2,A3) VALUES(I,I*10,I*100)
ENDFOR
BROWSE

&&取第2条记录为需要交换的数据1
GO 2
SCATTER TO Ary1

&&取第8条记录为需要交换的数据2
GO 8
SCATTER TO Ary2

&&交换数据
DIMENSION Ary3(ALEN(Ary1))
FOR i=1 TO ALEN(ary1)
    Ary3(i)=Ary1(i)
    Ary1(i)=Ary2(i)
    Ary2(i)=Ary3(i)
ENDFOR

&&回写到表
GO 2
FOR J=1 TO FCOUNT()
REPLACE (FIELD(J)) WITH Ary1(J)
ENDFOR

GO 8
FOR J=1 TO FCOUNT()
REPLACE (FIELD(J)) WITH Ary2(J)
ENDFOR

BROWSE

[ 本帖最后由 mywisdom88 于 2015-9-17 14:47 编辑 ]

下载后打不开呀！解压出现错误！

.  .   ..


[ 本帖最后由 hepingfly 于 2015-9-27 09:54 编辑 ]

.                 .

[ 本帖最后由 hepingfly 于 2015-9-27 09:55 编辑 ]

好压也无法打开，出现错误！
 


[ 本帖最后由 rqyys289 于 2015-9-23 16:12 编辑 ]

有问题的。

我也是VFP分班调整，调到指定班，就修改他的班号，同时在相对应的被调班级中查找性别、类别、成绩相近的学生，修改班号。最终重排序