请教专家,以下代码错在哪里?为什么当 "品种_特殊要求"= "加重杆"时,输出的结果还是"日生产能力_机加_车一般杆”的结果?
Case "品种_杆径","品种_长度"
Dim dc As DataRow = e.DataRow
Dim pc As DataRow
Dim filter1 As String
filter1 = "品种_杆径 = '" & dc("品种_杆径") & "' And 品种_长度 = '" & dc("品种_长度") & "'"
pc = DataTables("工序能力表").Find(filter1)
If pc IsNot Nothing Then
If dc("品种_特殊要求") = "加重杆"
dc("本工序_日生产能力_根") = pc("日生产能力_机加_车加重杆")
Else
dc("本工序_日生产能力_根") = pc("日生产能力_机加_车一般杆")
End If
End If