主题：根据 生产表的 生产数量，如何快速的 把产品入库，然后增加库存数量

两个方案：

1、我觉得你两个分成两个表，一个半成品表，一个成品表，做个按钮，单击此按钮，将半成品表的选定行复制到成品表，并从半成品表删除此行。

2、或者，做个统计按钮，用于刷新库存，会在在MainTablechanged事件设置代码。

For Each dr As DataRow In DataTables("表名").DataRows

     dr("库存") = DataTables("生产").Compute("Sum(数量)", "产品名称 = '" & dr("产品名称") & “‘”)

Next