If e.DataRow("每条单弧数") > Nothing AndAlso e.DataRow("每条双弧数") > Nothing
Dim dr As DataRow = DataTables("直身开料单").Find("生产piao号 = '" & e.DataRow("生产piao号一") & "' and 型号 = '" & e.DataRow("物料编号") & "' and 铣端头or打毛刺 = '" & e.DataRow("铣端头") & "' and 订单号 = '" & e.DataRow("订单号") & "' and 单条单弧 = '" & e.DataRow("每条单弧数") & "' and 单条双弧 = '" & e.DataRow("每条双弧数") & "'")
e.DataRow("长度") = dr("长度")
e.DataRow("插接口位置度A") = dr("插接口位置度A")
e.DataRow("插接口位置度B") = dr("插接口位置度B")
e.DataRow("插接口位置度C") = dr("插接口位置度C")
End If
上述代码起不了作用,其中“每条单弧数”、“每条双弧数”、“单条双弧”、“单条单弧” 都是整数格式的数据列,我怀疑数字格式数据列不能拿来进行比较。不知道是否还有其他原因?谢谢。