以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=138355)

--  作者：xxm653232 --  发布时间：2019/7/29 16:23:00 --  [求助] 在库存明细表中添加一个新的记录时，在库存表中如果是没有这个产品的，则在库存表中自动新增这个产品，如果库存表中是存在的话就不添加，产品由型号和颜色两部分组成，请问老师应该怎么做

--  作者：有点蓝 --  发布时间：2019/7/29 16:55:00 --   参考： 库存明细表datacolchanged事件 If e.DataCol.Name = "型号" OrElse e.DataCol.Name = "颜色" Then     Dim dr As DataRow     dr = DataTables("库存").Find("[型号] = \'" & e.DataRow("型号") & "\' and 颜色=\'" & e.DataRow("颜色") & "\'")     If dr Is Nothing Then          dr = DataTables("库存").AddNew         dr("型号") = e.DataRow("型号")         dr("颜色") = e.DataRow("颜色")     End If End If