目的：根据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编辑过]
加好友 
发短信
Post By：2014/12/17 16:47:00 [显示全部帖子]
