专家坐堂-同样代码，同样事件，只是条件不一样，为什么不执行Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- 同样代码，同样事件，只是条件不一样，为什么不执行

同样的代码，为什么放在出库数量下不执行计算，放在出库日期下要执行

请蓝版帮我查看下出库.出库明细表，DataColChanged事件中下面这段代码。

我本意是想当“出库.出库明细表”中出库数量列有变动时，商品库中的“出库总量”列自动计算出相同商品代码出库数量的合计。

——————————————————————————————————————————————————————————————

Dim dr,dr1 As DataRow

Case "出库日期"

        dr = DataTables("商品库").Find("商品代码 = " & "\'" & e.DataRow("商品代码") & "\'" )
        dr("出库总量") = DataTables("出库明细").Compute("sum(出库数量)","商品代码 = " & "\'" & e.DataRow("商品代码") & "\'" )
        MessageBox.Show(dr("出库总量") )
        dr("库存总量") = dr("入库总量") - dr("出库总量")

————————————————————————————————————————————————————————————
Dim dr,dr1 As DataRow
Case "出库数量"

        dr = DataTables("商品库").Find("商品代码 = " & "\'" & e.DataRow("商品代码") & "\'" )
        dr("出库总量") = DataTables("出库明细").Compute("sum(出库数量)","商品代码 = " & "\'" & e.DataRow("商品代码") & "\'" )
        MessageBox.Show(dr("出库总量") )
        dr("库存总量") = dr("入库总量") - dr("出库总量")

同样的代码，为什么放在出库数量下不执行计算，放在出库日期下要执行

下载信息 [文件大小：下载次数： ]
点击浏览该文件:出入库.rar

[此贴子已经被作者于2021/3/20 9:50:54编辑过]