目的:根据A表【AGENT_CODE】列值得变化,将关联的B表的【INSTITUTION】列值赋值给 A表的【MECHANISM】列(B表限制初始加载量了)
表 A DataColChanged 事件 :
Select Case e.DataCol.Name
Case "AGENT_CODE"
Dim pr As DataRow = e.DataRow
If pr.IsNull("AGENT_CODE") Then
Else
'If e.DataRow("AGENT_CODE") IsNot Nothing OrElse e.DataRow("AGENT_CODE") <> "" Then
Dim dr As DataRow
Dim sr As String = pr("AGENT_CODE")
dr = DataTables("AGENT_INFORMATION").SQLFind("AGENT_CODE = '"& sr &"' ")
If dr IsNot Nothing Then
pr("MECHANISM")=dr("INSTITUTION")
Else
msgbox("没找到此人数据")
End If
End If
End Select
每次执行都是现实 “没有找到此人数据”
但是 实际数据库中有那个人数据 将 "& sr &"' 改成真实数据 也是现实没有找到
是代码 哪里写错了吗?
请版主指教~~~ 谢谢啦~
[此贴子已经被作者于2014-12-17 16:51:59编辑过]