参考代码
Dim t As Table = Tables("意和表窗口_入库明细表")Dim dr As Row = Tables("意和表窗口_入库明细表").AddNew()dr("客户") = t.current("客户")dr("入库编号") = t.current("入库编号")