以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  请教一个输入警告问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=118317)

--  作者：edisontsui --  发布时间：2018/4/29 8:20:00 --  请教一个输入警告问题 我有两个数据表A和B，它们都有“物料编号”这一数据列。当我在B表的“物料编号”这个数据列输入数据时，它会去A表的“物料编号”里面查找，如果找到一样的物料编号，则允许输入，如果找不到一样的物料编号，则发出警告，并退出输入数据。那么在Datacolchanging 里面的代码该如何写呢？谢谢。

--  作者：有点蓝 --  发布时间：2018/4/29 9:10:00 --   参考：http://www.foxtable.com/webhelp/scr/0624.htm If e.DataCol.Name = "物料编号" Then     Dim dr As DataRow      dr = e.DataTable.Find("物料编号 = \'" & e.NewValue & "\'")     If dr Nothing Then         MessageBox.Show("此物料编号不存在!")         e.Cancel = True     End If End If