如何达到，同一张表的同一列，录入相同数据时（比如：身份证号），出现提示？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何达到，同一张表的同一列，录入相同数据时（比如：身份证号），出现提示？

共有39570人关注过本帖树形打印复制链接主题：如何达到，同一张表的同一列，录入相同数据时（比如：身份证号），出现提示？

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/13 14:20:00 [显示全部帖子]

在列属性中禁止重复呀

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/13 14:30:00 [显示全部帖子]

那就自己写代码。

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/13 14:46:00 [显示全部帖子]

Dim drs As List(Of DataRow) = DataTables("表A").Select("[第一列] = '" & e.DataRow("第一列") & "'")
if drs.Count - 1 > 0 Then
MessageBox.Show(" 重复")
End If

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/13 14:54:00 [显示全部帖子]

e.DataRow("身份证号") = Nothing

既然列属性中可以禁止重复并清空重复项，你还要做这样的提示并清空，这不是胶裤子放屁吗？

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/13 15:31:00 [显示全部帖子]

e.DataRow("身份证号")<>""应该是可以省略的，这个我做过测试。
r>-1，好象也不行。

[此贴子已经被作者于2009-8-13 15:32:37编辑过]

czy

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

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/17 12:23:00 [显示全部帖子]

以下是引用wcs在2009-8-17 12:05:00的发言：
我不明白这个问题为什么有8页的回贴，还没能搞定这个问题。

人家根本就不想让大家一下子弄明白这个问题。
所以大家差不多都避而远之了。

主题：如何达到，同一张表的同一列，录入相同数据时（比如：身份证号），出现提示？