比如,从【市场】数据表里面引用 “单价” “收费” “金额” 三列数据,到【仓库】的表里面。
在【仓库】的Datacolchange 里面设置了如下的代码,但是发现,很多数据引用不进来。
有的行的数据就可以,有的行就不可以。
是外部数据源的表。【市场】和【仓库】加载的数据也不一样。
该如何解决?
DataTables("仓库").DataCols("市场单号").RaiseDataColChanged()
If e.DataCol.Name = "市场单号" Then
If e.NewValue Is Nothing Then
e.DataRow("单价") = Nothing
e.DataRow("收费") = Nothing
e.DataRow("金额") = Nothing
Else
Dim dr As DataRow
dr = DataTables("市场").Find("[市场单号] = '" & e.NewValue & "'")
If dr IsNot Nothing
e.DataRow("单价") = dr("单价")
e.DataRow("收费") = dr("收费")
e.DataRow("金额") = dr("金额")
End If
End If
End If
[此贴子已经被作者于2014-3-4 0:18:47编辑过]