Foxtable(狐表)用户栏目专家坐堂 → 关联问题


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

主题:关联问题

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/28 9:13:00 [显示全部帖子]

 有必要一定要设置关联吗?做关联的目的是什么?

 

 不是可以用简单方法,就可以利用副本表实现类似关联表的功能?


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/28 11:31:00 [显示全部帖子]

 模拟关联,就是控制一下currentchanged事件就好啊。没那么复杂


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/28 14:22:00 [显示全部帖子]

以下是引用实话实说在2016/12/28 13:09:00的发言:

网络不太好。模拟关联还是要先建立关联,我需要动态关联,也就是打开窗口的时候建立关联,关闭窗口的时候删除关联,这样在运行其它模块时可以独立加载表,不需要关联加载。

[此贴子已经被作者于2016/12/28 13:08:55编辑过]

 

不需要建立关联的啊,请好好看模拟关联的核心内容,就是currentChanged事件而已。


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/28 15:32:00 [显示全部帖子]

 同步显示控制currentchanged事件即可

 

5、关闭窗口设计器,回到产品表,打开表属性设置窗口,将其CurrentChanged事件代码设为:

If Forms("窗口1").Opened() '一定要判断用于模拟关联表的窗口是否已经打开
    Dim t As Table = Tables("窗口1_Table1")
    With Tables("产品")
        If .Current Is Nothing Then
            t.Filter = "False"
        Else
            t.Filter = "产品编号 = " & .Current("产品编号")
        End If
    End With
End If


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/28 17:30:00 [显示全部帖子]

汗,这么简单的事,你搞那么复杂

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/13 19:05:00 [显示全部帖子]

Dim nr As Row = Tables("窗口1_Table2").AddNew()

nr("某列") = "xxx"

nr("某列") = "yyy"


 回到顶部