事件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

共有4166人关注过本帖树形打印复制链接主题：事件

bzqlyj

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

加好友

发短信

等级：童狐帖子：271 积分：2246 威望：0 精华：0 注册：2020/9/28 14:53:00

事件

Post By：2021/5/8 12:19:00 [只看该作者]

在表事件DataColChanging中，有查找重复代码，

If e.DataCol.Name = "身份证号" Then
    Dim dr As DataRow
    dr = e.DataTable.Find("身份证号 = '" & e.NewValue & "'")
    If dr IsNot Nothing Then
        MessageBox.Show("此身份证号已经存在!")

e.Cancel = True
End If
End If

如何将此事件的代码写入按钮事件click中去

有点蓝

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

加好友

发短信

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/8 13:34:00 [只看该作者]

dim r as row = tables("xx").current

Dim dr As DataRow
dr = DataTables.Find("身份证号 = '" & r("身份证号") & "' and _Identify <>" & r("_Identify"))

If dr IsNot Nothing Then
MessageBox.Show("此身份证号已经存在!")

End If

bzqlyj

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

加好友

发短信

等级：童狐帖子：271 积分：2246 威望：0 精华：0 注册：2020/9/28 14:53:00

回复：（有点蓝）dim r as row = tables("xx").curren... 发帖心情

Post By：2021/5/8 14:35:00 [只看该作者]

直接放入按钮click内，出现如图
图片点击可在新窗口打开查看

此主题相关图片如下：kkkk.png

有点蓝

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

加好友

发短信

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/8 14:41:00 [只看该作者]

dr = DataTables("某某表").Find("身份证号 = '" & r("身份证号") & "' and _Identify <>" & r("_Identify"))

bzqlyj

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

加好友

发短信

等级：童狐帖子：271 积分：2246 威望：0 精华：0 注册：2020/9/28 14:53:00

回复：（有点蓝）dr = DataTables("某某表").Fin... 发帖心情

Post By：2021/5/10 8:48:00 [只看该作者]

请问一下，如果在窗口的录入Ａ列，通过Ａ列的事件leava(离开控件后执行）来查重复，有重复时，则不离开此Ａ列，如何实现

有点蓝

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

加好友

发短信

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/10 8:51:00 [只看该作者]

到控件Validating事件判断：http://www.foxtable.com/webhelp/topics/0736.htm

bzqlyj

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

加好友

发短信

等级：童狐帖子：271 积分：2246 威望：0 精华：0 注册：2020/9/28 14:53:00

回复：（bzqlyj）回复：（有点蓝）dr = DataTabl... 发帖心情

Post By：2021/5/10 11:05:00 [只看该作者]

但只要光标一停留在窗口Ａ列的录入框内

有点蓝

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

加好友

发短信

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/10 12:01:00 [只看该作者]

是要在表格单元格里录入？还是在窗口文本框控件里录入？

如果是单元格，到表格BeforeSelChange事件处理：http://www.foxtable.com/webhelp/topics/0644.htm

bzqlyj

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

加好友

发短信

等级：童狐帖子：271 积分：2246 威望：0 精华：0 注册：2020/9/28 14:53:00

回复：（有点蓝）是要在表格单元格里录入？还是在窗口... 发帖心情

Post By：2021/5/10 13:20:00 [只看该作者]

还是在窗口文本框控件里录入？

有点蓝

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

加好友

发短信

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/10 13:35:00 [只看该作者]

那就不懂7楼表达什么意思了，Validating事件判断后使用e.cancel=true，光标就是在原输入框的

下一主题 >> << 上一主题

总数 22 1 2 3 下一页

主题：事件