- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 事件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=164904)
-- 发布时间：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中去
-- 发布时间：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
-- 发布时间：2021/5/8 14:35:00
-- 回复：（有点蓝）dim r as row = tables("xx").curren...
直接放入按钮click内，出现如图
此主题相关图片如下：kkkk.png
-- 发布时间：2021/5/8 14:41:00
--
dr = DataTables("某某表").Find("身份证号 = \'" & r("身份证号") & "\' and _Identify <>" & r("_Identify"))
-- 发布时间：2021/5/10 8:48:00
-- 回复：（有点蓝）dr = DataTables("某某表").Fin...
请问一下，如果在窗口的录入Ａ列，通过Ａ列的事件leava(离开控件后执行）来查重复，有重复时，则不离开此Ａ列，如何实现
-- 发布时间：2021/5/10 8:51:00
--
到控件Validating事件判断：http://www.foxtable.com/webhelp/topics/0736.htm
-- 发布时间：2021/5/10 11:05:00
-- 回复：（bzqlyj）回复：（有点蓝）dr = DataTabl...
但只要光标一停留在窗口Ａ列的录入框内
-- 发布时间：2021/5/10 12:01:00
--
是要在表格单元格里录入？还是在窗口文本框控件里录入？
如果是单元格，到表格BeforeSelChange事件处理：http://www.foxtable.com/webhelp/topics/0644.htm
-- 发布时间：2021/5/10 13:20:00
-- 回复：（有点蓝）是要在表格单元格里录入？还是在窗口...
还是在窗口文本框控件里录入？
-- 发布时间：2021/5/10 13:35:00
--
那就不懂7楼表达什么意思了，Validating事件判断后使用e.cancel=true，光标就是在原输入框的