以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  判定条件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33647)

--  作者:caiyt0
--  发布时间:2013/5/22 10:49:00
--  判定条件

Dim dr1 As DataRow
dr1 = DataTables("BOM_机台").Find("[jth] = \'" & e.NewValue & "\'") 
 If dr1 IsNot Nothing
   If dr1("sfzs") = True Then
      e.DataRow("sjcn") =e.DataRow("sbms")-e.DataRow("xbms")+e.DataRow("sjxbms_1")+e.DataRow("sjxbms_2")+e.DataRow("sjxbms_3")+e.DataRow("sjxbms_4")
   Else
      e.DataRow("sjcn")= e.DataRow("xbms")-e.DataRow("sbms")+e.DataRow("sjxbms_1")+e.DataRow("sjxbms_2")+e.DataRow("sjxbms_3")+e.DataRow("sjxbms_4")
   End If
 End If

 

如果我在加上两个判定条件,如果生产表的,SBMS和XBMS发生改变也执行上面的公式,这两个判定条件改怎么加


--  作者:Bin
--  发布时间:2013/5/22 11:37:00
--  
不是很理解的你表达的需求? 直接放到DataColChanged事件中,判断一下列名不就号了吗?