-- 作者:有点蓝
-- 发布时间:2024/1/13 18:03:00
--
Select Case e.DataCol.Name Case "产线名称","客户名称","简写型号规格" Dim dr As DataRow = e.DataRow If dr.IsNull("客户物料") andalso dr("简写型号规格") = "OCF" andalso dr("产线名称") = "滤波器" andalso dr("客户名称") = "出口中性" Then dr("客户物料") = pr("物料") End If End Select