老师，您好，我在DataColChanged写了以下代码Select Case e.DataCol.Name
Case "主件品号","子件品号"
Dim dr As DataRow = e.DataRow
Dim pr As DataRow
If dr.IsNull("主件品号") OrElse dr.IsNull("子件品号") Then
dr("单价") = Nothing
Else
Dim filter As String
filter = "品号 = '" & dr("子件品号") & "'"
pr = DataTables("采购订单").Find(filter,"采购日期 desc")
If pr IsNot Nothing Then
dr("单价") = pr("单价")
End If
End If
End Select
我之前点击子件品号，重置列时，列出了单价是5.01，但发现价格是错的，重新点击子件品号，重置列时，列出的单价还是5.01没有变。但我知道实际的单价是O.
我将904056301X1这个编码删除，重新现录入时，单价就是O了，是不是代码哪里有问题？
此主题相关图片如下：904056301x1.png
加好友 
发短信
Post By：2023/8/7 15:54:00 [只看该作者]
