用代码解决, 设置表A的DatacolChanged事件：
Slect Case e.DataCol.Name
Case “证件号”
Dim r As Row = DataTables("表B").Find("证件号 = '" & e.NewValue & "'")
If r IsNot Nothing Then
e.Datarow("单位") = r("单位")
End if
End Select
相关知识：
http://www.foxtable.com/help/topics/1451.htm
加好友 
发短信
Post By：2012/11/23 11:27:00 [显示全部帖子]
