再次确认一下15楼是这样吗: 这段代码我是覆盖下达生产计划窗口下达生产计划控件的如下代码: for n as integer = 0 to tables("计划工序").count-1 if tables("计划工序").rows(n)("图号") = tables("产品目录").current("图号") and tables("计划工序").rows(n).isnull("派工单号") tables("计划工序").rows(n)("派工单号") = Forms("下达生产计划").Controls("(派工单号)").text tables("计划工序").rows(n)("计划数量") = Forms("下达生产计划").Controls("(计划数量)").text end if next