Foxtable(狐表)用户栏目专家坐堂 → 选定行后通过关联列自动加载


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

主题:选定行后通过关联列自动加载

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106538 积分:541855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/17 15:55:00 [显示全部帖子]

表A,CurrentChanged事件

Dim r As Row  = Tables("表A").Current
If r Is Nothing Then '如果Current为Nothing
    Return '则返回
End If

DataTables("表B").LoadFilter = "第一列='" & r("第一列") & "' And 第二列='" & r("第二列") & "'"
DataTables("表B").Load

 回到顶部