| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1093 人关注过本帖
标题:求助:这个代码怎么写?
只看楼主 加入收藏
zhangxinsh
Rank: 1
等 级:新手上路
帖 子:19
专家分:4
注 册:2017-3-15
收藏
 问题点数:0 回复次数:6 
求助:这个代码怎么写?



如图,只要写出一种方法就好,我用的VFP9.0,我自己写不好。完不成作业。

各位大神一定要帮忙啊,这个对于你们来说,不算事,但是我很需要学会这个,谢谢啦~~~~~~~~

拜谢

语句越简单越好
图片附件: 游客没有浏览图片的权限,请 登录注册

2017-03-31 11:19
zhangxinsh
Rank: 1
等 级:新手上路
帖 子:19
专家分:4
注 册:2017-3-15
收藏
得分:0 
没有人来帮忙吗??

2017-03-31 11:43
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
看不出,你要做什么。。。
2017-03-31 12:00
zhangxinsh
Rank: 1
等 级:新手上路
帖 子:19
专家分:4
注 册:2017-3-15
收藏
得分:0 
回复 3楼 mywisdom88
就是用统计表里的帅群替换掉舞蹈班和语言班的李娜

或者说将舞蹈班和语言班的李娜替换成统计表里面的帅群
2017-03-31 12:37
zhangxinsh
Rank: 1
等 级:新手上路
帖 子:19
专家分:4
注 册:2017-3-15
收藏
得分:0 
怎样用代码来实现

2017-03-31 12:38
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
* VFP 用REPLACE 命令,参考下面
* 先打开表 tb1(字段1,字段2,字段3,字段4)
* 先打开表 tb2(字段1,字段2,字段3,字段4)
if !used("tb1")
   use d:\test\tb1.dbf in 0
end
if !used("tb2")
   use d:\test\tb2d.dbf in 0
end

* 把要替换内容找出来,放到变量 a1,a2,a3,a4 去
a1='帅群'
select tb2
locate for allt(字段1)=a1
if found()
   a2=allt(字段2)
   a3=allt(字段3)
   a4=allt(字段4)
   
   select tb1
   b1='李娜'
   locate for allt(字段1)=b1
   if found()
      replace 字段1 with a1,字段2 with a2,字段3 with a3,字段4 with a4
   endif
endif
* 注意,上面的字段都是按 字符类型来的,如果不是字符串的,要把 allt()函数去掉,你看看这明白不,看明白了,你自己就可以根据这个来修改你自己的了。
* 这只是其中的1种,还有很多


2017-03-31 14:11
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
SELECT xytj
LOCATE FOR ALLTRIM(姓名)=="帅群"
IF FOUND()
    SELECT wdb
    LOCATE FOR ALLTRIM(姓名)=="李娜"
    IF FOUND()
        REPLACE 姓名 WITH xytj.姓名,;
            性别 WITH xytj.性别,;
            年龄 WITH xytj.年龄,;
            入学时间 WITH xytj.入学时间,;
            开班时间 WITH xytj.开班时间,;
            备注 WITH xytj.备注
    ENDIF
    SELECT yyb
    LOCATE FOR ALLTRIM(姓名)=="李娜"
    IF FOUND()
        REPLACE 姓名 WITH xytj.姓名,;
            性别 WITH xytj.性别,;
            年龄 WITH xytj.年龄,;
            入学时间 WITH xytj.入学时间,;
            开班时间 WITH xytj.开班时间,;
            备注 WITH xytj.备注
    ENDIF
ENDIF
2017-03-31 22:56
快速回复:求助:这个代码怎么写?
数据加载中...
 
   



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

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