如何在按钮实现全列身份证号的重复比较？谢谢 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何在按钮实现全列身份证号的重复比较？谢谢

共有20638人关注过本帖树形打印复制链接主题：如何在按钮实现全列身份证号的重复比较？谢谢

狐狸爸爸

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/9/2 16:53:00 [显示全部帖子]

菜单中有重复值筛选的

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/9/2 16:57:00 [显示全部帖子]

具体情况具体分析。
用Find方法，看看有没有重复的，有就在审核列写入内容

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/9/3 9:25:00 [显示全部帖子]

For Each dr As DataRow In DataTables("审核").DataRows
r("审核") = ""
next
With Tables("审核")

.Filter = ""

.Select(.RowSel,.cols("身份证号").Index)

Syscmd.Filter.ShowSameValues

For Each r As Row In .Rows

r("审核") = "身份证号码重复,请核实!!!"

.Filter = ""
End With

[此贴子已经被作者于2009-9-3 9:25:40编辑过]

主题：如何在按钮实现全列身份证号的重复比较？谢谢