以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  关于窗口按钮  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=141629)

--  作者：ygg8310 --  发布时间：2019/10/7 15:54:00 --  关于窗口按钮  Dim dr As DataRow = e.DataRow         If dr.IsNull("第一列") = False AndAlso dr.IsNull("第二列") = False AndAlso dr.IsNull("第三列") = False AndAlso dr.IsNull("第四列") = False AndAlso dr.IsNull("第五列") = False Then             If e.DataTable.Compute("Count([_Identify])","第一列 = \'" & dr("第一列") & "\' And 第二列 = \'" & dr("第二列") & "\' And 第三列 = \'" & dr("第三列") & "\' And 第四列 = \'" & dr("第四列") & "\' And 第五列 = \'" & dr("第五列") & "\'") > 1 Then                 MessageBox.Show("已经存在相同型号和规格的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)                 e.DataRow(e.DataCol.Name) = e.OldValue \'取消输入             End If         End If 为何窗口按钮不能使用这个代码？又该怎么办？

--  作者：有点蓝 --  发布时间：2019/10/7 16:01:00 --   想象按钮里会有行datarow这种东西吗？ Dim dr As Row = tables(xxx).current