以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教专家怎么用代码实现关联表?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89942)

--  作者:i4whylg
--  发布时间:2016/9/1 17:46:00
--  请教专家怎么用代码实现关联表?
假设表A,列“单位名称”、“单位地址”;表B,列“单位名称”、“职工姓名”、表C,列“职工姓名”、“职工工资记录”
设计一个窗口,窗口里有三个table,分别绑定ABC三个表。

请问:怎么实现点击表A中一行,表B的Filter=表A当前行的“单位名称”,再点击表B中的一行,表C的Filter=表B当前行的“职工姓名”?

--  作者:有点蓝
--  发布时间:2016/9/1 18:11:00
--  
http://www.foxtable.com/webhelp/scr/0641.htm

比如表ACurrentChanged事件

If e.Table.Current Is Nothing Then \'如果Current为Nothing
    Tables("表B").Filter = ""
Else
    Tables("表B").Filter = "单位名称 = \'" & e.Table.Current("单位名称") & "\'"
End If
[此贴子已经被作者于2016/9/1 18:11:33编辑过]