以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助] 禁止重复值，如何跳出已重复的行？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=39532)

--  作者：Bin --  发布时间：2013/8/26 16:22:00 --   设置一个窗口,放一个SQLTable  然后 If e.DataCol.Name = "订单号" Then     Dim dr As DataRow      dr = e.DataTable.Find("订单号 = \'" & e.NewValue & "\'")     If dr IsNot Nothing Then         MessageBox.Show("此订单号已经存在!")         \'在这里打开那个窗口          打开后利用 tables("窗口名_Table1").Fill(select * from 表名 where 单号=\'" & dr("单号") & "\'") 填充数据 http://www.foxtable.com/help/topics/1930.htm         e.Cancel = True     End If End If