主题：高手请进 问题

 到订单明细表里写这样的代码。DataColChanged事件。

Select Case e.DataCol.Name
    Case "部件名称","板件名称","成品长","成品宽","成品高","封边信息"
        If e.DataRow.RowState = DataRowState.Detached AndAlso e.DataRow.IsNull("产品编号") Then
            e.DataRow("产品编号") = Forms("部件筛选").Controls("ComboBox1").Text
        End If
End Select