老师，您好！
由以下代码：
Select Case e.DataCol.Name
Case "部品ID","部组名"
Dim dr13 As DataRow = e.DataRow
Dim pr13 As DataRow
If dr13.IsNull("部品ID") And dr13.IsNull("部组名") Then
dr13("总装个付") = Nothing
Else
Dim filter As String
filter = "部品ID = '" & dr13("部品ID") & "'"
pr13 = DataTables("加工用製品构成").Find(filter)
dr13("序号") = pr13("序号")
dr13("总装个付") = pr13("制品个付") * pr13("部品个付")* pr13("部组个付")
dr13("安全在库数") = pr13("安全在库")
End If
End Select
现在出现了一个问题，如果在导入时，过程中出现“部组名”列有内容，“部品ID”是空值时，从这一行开始，
以后的即使符合条件，也不导入了，如果将这一行删掉，就导入了，
请老师帮看看，谢谢！
加好友 
发短信
Post By：2017/5/26 11:10:00 [显示全部帖子]
