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

--  作者：outcat --  发布时间：2018/1/6 2:06:00 --  表达式 If e.DataCol.Name = "未回数量" Then \'如果是已结帐列的内容变动     If e.NewValue = 0 Then \'而且变动后的值是True(已勾选)         Dim dr1 As DataRow         dr1 = DataTables("供应商订货总表").Find("未回数量 = \'" & Tables("供应商订货总表").Current("未回数量") & "\'")         If dr1("票号")=e.DataRow("票号")             dr1("核销") = True          End If     End If End If 有一个订单表，一个发货表    订单表有 未回数量 核销 这两列  我要当订单表的未回数量等于0时，让核销字段自动变为true，可是现在这段代码却是一旦保存订单表示，且显示 未回数量不是0，核销已经 变为了 true 怎么回事呀 ，这个是在订单表 DataColChanged 中写的代码

--  作者：有点蓝 --  发布时间：2018/1/6 8:48:00 --   通过编号查询对应的数据，而不是数量 If e.DataCol.Name = "未回数量" Then \'如果是已结帐列的内容变动     If e.NewValue = 0 Then \'而且变动后的值是True(已勾选)         Dim dr1 As DataRow         dr1 = DataTables("供应商订货总表").Find("票号 = \'" & e.DataRow("票号") & "\'")         If dr1 isnot nothing then             dr1("核销") = True          End If     End If End If