If e.DataCol.Name = "长度" Then
If dr("制造产品号").startsWith("C")
If e.DataRow.IsNull("生产piao号") = False AndAlso e.DataRow.IsNull("制造产品号") = False
Dim dr3 As DataRow = e.DataRow
If e.DataTable.Find("生产piao号 = '" & dr3("生产piao号") & "' And 制造产品号 = '" & dr3("制造产品号") & "'") IsNot Nothing Then '如果找到生产piao号和制造产品号完全相同的行，则不执行判断杆数的代码
Else
'判断杆数
If dr("制造产品号").startsWith("CFU")
If dr("制造产品号").contains("16G")
dr("每套杆数") = 1
ElseIf dr("制造产品号").contains("32G")
dr("每套杆数") = 2
ElseIf dr("制造产品号").contains("50G")
dr("每套杆数") = 3
End If
End If
'结束判断杆数
End If
End If
Else
dr("每套杆数") = Nothing
dr("每杆铜片") = Nothing
dr("铜片总数") = Nothing
End If
End If
上面的代码，如果不要第4层的 if... else... end if 嵌套，那么执行起来是没有问题的。但是加上第4层嵌套，执行起来就没有作用了。请假是哪里的问题？谢谢。
加好友 
发短信
Post By：2019/5/30 14:23:00 [只看该作者]
