| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1231 人关注过本帖
标题:请问班级同学互换的程序怎样用VFP实现(请看下图)
只看楼主 加入收藏
沙枣
Rank: 4
来 自:宁夏银川
等 级:业余侠客
威 望:5
帖 子:103
专家分:221
注 册:2015-5-31
收藏
得分:3 
回复 楼主 rqyys289
不给样本数据怎么做?
2015-09-17 07:57
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:3 

没难度的,就是选择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 编辑 ]
2015-09-17 10:05
rqyys289
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2015-3-16
收藏
得分:0 
回复 10楼 hepingfly
下载后打不开呀!解压出现错误!
2015-09-22 11:19
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:0 
.  .   ..


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

星际花草
2015-09-22 14:41
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
回复 14楼 hepingfly
图片附件: 游客没有浏览图片的权限,请 登录注册
2015-09-22 16:53
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:0 
.                 .

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

星际花草
2015-09-22 20:39
rqyys289
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2015-3-16
收藏
得分:0 
好压也无法打开,出现错误!
 


[ 本帖最后由 rqyys289 于 2015-9-23 16:12 编辑 ]
2015-09-23 16:11
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
有问题的。
2015-09-23 17:37
hepingfly
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:195
专家分:657
注 册:2015-5-21
收藏
得分:0 
对换班.zip (1.01 MB)

星际花草
2015-09-27 09:56
hgzgrg
Rank: 1
等 级:新手上路
威 望:1
帖 子:13
专家分:3
注 册:2013-12-17
收藏
得分:0 
我也是VFP分班调整,调到指定班,就修改他的班号,同时在相对应的被调班级中查找性别、类别、成绩相近的学生,修改班号。最终重排序
2015-09-28 16:12
快速回复:请问班级同学互换的程序怎样用VFP实现(请看下图)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018102 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved