If e.DataCol.Name = "制造产品号" Then
If e.newvalue.startswith("B") OrElse e.newvalue.startswith("C")
e.DataRow("类型") = "侧板"
End If
End If
改为
If e.DataCol.Name = "制造产品号" Then
if e.newvalue > "" then
If e.newvalue.startswith("B") OrElse e.newvalue.startswith("C")
e.DataRow("类型") = "侧板"
End If
end if
End If
-----
If e.DataCol.Name = "制造产品号" Then
If e.newvalue.contains("钣金")
e.DataRow("类型") = "钣金"
ElseIf e.newvalue.contains("铝槽")
e.DataRow("类型") = "铝槽"
ElseIf e.newvalue.contains("铝管")
e.DataRow("类型") = "铝管"
Else
If e.DataRow("piao号").contains("钣金")
e.DataRow("类型") = "钣金"
ElseIf e.DataRow("piao号").contains("铝槽")
e.DataRow("类型") = "铝槽"
ElseIf e.DataRow("piao号").contains("铝管")
e.DataRow("类型") = "铝管"
End If
End If
End If
改为
If e.DataCol.Name = "制造产品号" OrElse Then
If e.newvalue > "" Then
If e.newvalue.contains("钣金")
e.DataRow("类型") = "钣金"
ElseIf e.newvalue.contains("铝槽")
e.DataRow("类型") = "铝槽"
ElseIf e.newvalue.contains("铝管")
e.DataRow("类型") = "铝管"
ElseIf e.DataRow.Isnull("piao号") = False
If e.DataRow("piao号").contains("钣金")
e.DataRow("类型") = "钣金"
ElseIf e.DataRow("piao号").contains("铝槽")
e.DataRow("类型") = "铝槽"
ElseIf e.DataRow("piao号").contains("铝管")
e.DataRow("类型") = "铝管"
End If
End If
End If
End If