| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3048 人关注过本帖
标题:一个适合初学者测试用的小程序,有待完善
取消只看楼主 加入收藏
管尊
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2016-6-21
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:2 
一个适合初学者测试用的小程序,有待完善
本人也是VFP的初学者,作为初学者经常要用表做练习
如果表里的关键字段有重复了可能会导致整个表在后续的练习都不能进行
一个一个对又很麻烦
所以写了一个检测表重复字段的程序:
————————————————
clear
USE 试验用表
GO top
DO WHILE .not.EOF()
b=RECNO()
a=学号
LOCATE FOR 学号=a
   DO WHILE .not.EOF()
    DISPLAY off
    CONTINUE
   ENDDO
GO b
SKIP
ENDDO
?"检测结束"
use
——————————————
但是有个问题
因为是locate for,每次找相同的字段时都会从第一个开始找
也就是说每遇到有相同字段的记录都会显示一次
有几个显示几遍,如果有多个相同的就会显示很多遍
这个我不会解决,也许以后技术好了会吧。
希望有大神指教。
搜索更多相关主题的帖子: 关键字 记录 检测 
2016-10-15 12:00
管尊
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2016-6-21
收藏
得分:0 
回复 2楼 sdta
大神,请问:
create cursor tt (学号 C(3))
insert into tt values ("001")
这两句是什么意思,干什么用的?
还是谢谢大神指教!
2016-10-15 16:23
管尊
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2016-6-21
收藏
得分:0 
回复 2楼 sdta
大神啊,这个我试了试不对,我的目标是给一个表,自动逐条检测学号字段是否相同,相同了就显示
但是您这个还得自己输入。
我想问下如何直接从定位的记录开始向下检测,而不是从头再来一遍。
谢谢大神!
2016-10-15 16:37
快速回复:一个适合初学者测试用的小程序,有待完善
数据加载中...
 
   



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

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