Foxtable(狐表)用户栏目专家坐堂 → 请问如何实现两个表的联动


  共有3278人关注过本帖树形打印复制链接

主题:请问如何实现两个表的联动

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/2 21:22:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/5 21:07:00 [显示全部帖子]

1、表在哪里不是问题,逻辑都是一样的

2、Dim t As Table = e.form.controls("Table2").table

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/5 21:25:00 [显示全部帖子]

基本信息表,CurrentChanged事件

Dim t As Table = Tables("儿童睡眠紊乱量表")
With Tables("基本信息")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "编号 = '" & .Current("编号") & "' and 姓名='" & .Current("姓名") & "'"
    End If
End With

 回到顶部