主题：保存按钮后如何更新数据！！

Select Case e.DataCol.Name
    Case "产品编号"
        Dim filter As String = "产品编号 = '" & e.DataRow("产品编号") & "'"
        e.DataRow("入库数量") = DataTables("入库表").SQLCompute("sum(入库数量)", filter)
        e.DataRow("出库数量") = DataTables("出库表").SQLCompute("sum(出库数量)", filter)
End Select

e.DataRow("库存数量") = e.DataRow("原始库存") - e.DataRow("出库数量") + e.DataRow("入库数量")

这样，在出库表里录入出库数据后，库存表里的数据不能更新，我原来用的是加载树的办法。还有什么其它方法吗？