| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1224 人关注过本帖
标题:请教检测表中有无重复记录
只看楼主 加入收藏
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用fdxxhjc在2015-2-24 12:55:00的发言:

先生不好意思是我没表达清楚,我的要求是:只要表中有两个或两个以上的记录数值相等(不管有多少种不同的相等数值)就算检测结果为“假”,若两两各不相等就算检测结果为“真”。谢谢先生

谁和谁相等,真、假相对谁而言

坚守VFP最后的阵地
2015-02-24 13:21
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
收藏
得分:0 
是整个表比较,还是在一条记录中?

认真看书学习,弄通Fox主义。
2015-02-24 13:55
taifu945
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:80
帖 子:1545
专家分:3298
注 册:2012-7-6
收藏
得分:0 
看来还是没表达清楚。
2015-02-24 14:17
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
如果只是判断真、假(相同的值),最后查询结果表中的记录不为空,说明结果为假,否则为真。

坚守VFP最后的阵地
2015-02-24 14:21
ktliaobonk
Rank: 2
等 级:论坛游民
帖 子:8
专家分:14
注 册:2015-2-14
收藏
得分:10 
Select 原表
Go 1
 k = 0
 RETURN1 = 0
 DIMENSION number1(11,11)
 FOR i = 1 TO 11  &&将二维表格数据导入一维数组
    FOR ii = 1 TO 11
         k = k+1
         a = FIELD(ii)
         number1(k) = &a
     ENDFOR
     SKIP
 ENDFOR
 FOR i = 1 TO 121  &&逐个比较
     aa = number1(i)
      FOR ii = 1 TO 121
      bb = number1(ii)
      IF aa = bb AND i!=ii &&这里必须排除自身
        RETURN1 = 1
        MESSAGEBOX('找到重复记录:'+ALLTRIM(STR(aa)))
         EXIT
      ENDIF
      ENDFOR
      IF RETURN1 = 1
         EXIT
      ENDIF
 ENDFOR

[ 本帖最后由 ktliaobonk 于 2015-2-25 00:53 编辑 ]
收到的鲜花
  • fdxxhjc2015-02-25 14:58 送鲜花  3朵   附言:好文章
2015-02-24 16:39
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
看不太明要求,到底是“表中”还是“记录中”?
只能按假设构思一下:
1、如果按每条记录进行比对。将某一记录复制到数组,再对数组排序,这条记录有无重复就好清楚了。
2、如果按整个表的数据进行对比,将整个表复制到数组,再对数组排序,整个表有多少重复也就好清楚了。
注意:多列数组要转换为单列数组。
2015-02-24 17:22
fdxxhjc
Rank: 1
等 级:新手上路
帖 子:305
专家分:0
注 册:2014-4-10
收藏
得分:0 
回复 9楼 sdta
先生您的代码运行下来怎么会有重复的数值“48”的,我的表中显然是没有重复的48的
2015-02-24 20:31
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用fdxxhjc在2015-2-24 20:31:41的发言:

先生您的代码运行下来怎么会有重复的数值“48”的,我的表中显然是没有重复的48的

我写的是通用代码,自己修改一下吧

坚守VFP最后的阵地
2015-02-24 20:34
fdxxhjc
Rank: 1
等 级:新手上路
帖 子:305
专家分:0
注 册:2014-4-10
收藏
得分:0 
回复 18楼 sdta
哦,谢谢先生
2015-02-24 20:50
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:0 
第一,要真實意圖和真實數據。
第二,文字敘述不清,就多給樣本,而不是衹給一個被誤會成特例。

別人搞錯了意圖,耽誤別人的功夫是另一回事(可能那人的確閑得慌),但更耽誤自己的事才是大事。

授人以渔,不授人以鱼。
2015-02-24 20:57
快速回复:请教检测表中有无重复记录
数据加载中...
 
   



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

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