- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=43656)
-- 发布时间：2013/12/12 14:26:00
-- [求助]
求助各位给个思路：
现有一张表希望实现：在“分包合同编号”相同的情况下，“资料名称”不能相同，如输入相同的“资料名称”提示“该过程资料已经录入!"
(附件一是希望实现的，附件二是错的）
此主题相关图片如下：附件一.jpg
此主题相关图片如下：附件二.jpg
-- 发布时间：2013/12/12 14:42:00
--
在DataColChanging 中利用 FInd查找是否有重复的行
If e.DataCol.name="资料名称" Then
Dim dr As DataRow = e.DataTable.Find("分包合同编号=\'" & e.datarow("分包合同编号") & "\' and 资料名称=\'" & e.newValue & "\'")
If dr IsNot Nothing Then
MessageBox.show("重复")
e.Cancel=True
End If
End If
-- 发布时间：2013/12/12 14:58:00
--
谢谢!