以下是引用土佛在2012-2-23 20:34:00的发言：
（"出货规划")中("DNP预出_此批总M")列变化时也能使("同批剩余可支配总_正品M"）列变化
另外在“出货规划”表设置DataColChanged事件代码:
Select Case e.DataCol.Name
Case "DNP预出_此批总M"
Dim sm As Long = DataTables("DNP入仓规划").Compute("Sum(实入仓M_正品M)","DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")-DataTables("出货规划").Compute("Sum(DNP预出_此批总M)","DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")
DataTables("DNP入仓规划").ReplaceFor("同批剩余可支配总_正品M",sm, "DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")
End Select
加好友 
发短信
Post By：2012/2/23 21:48:00 [显示全部帖子]
