Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口操作副表如何实现联动


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

主题:[求助]窗口操作副表如何实现联动

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
[求助]窗口操作副表如何实现联动  发帖心情 Post By:2013/9/14 11:54:00 [只看该作者]

如何通过右边操作按钮操作窗口,实现右边的绑定的内容在指定框里显示出来和下边的关联表也作对应变化。
实例传不上上来,哪位高手能否把邮箱提供下,我直接发邮箱里吧?或加下我QQ:694687928
[此贴子已经被作者于2013-9-14 11:55:04编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/9/14 11:55:00 [只看该作者]

使用IE 火狐 谷歌等浏览器上传吧,不然传到百度网盘然后把连接发上来也可以.

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
链接  发帖心情 Post By:2013/9/14 12:00:00 [只看该作者]

http://yunpan.cn/QG3AdsF2vXbYN

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/9/14 12:03:00 [只看该作者]

不是很懂你的意思啊,你现在就一句是选择下面的关联表就自动变化了呀.

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
  发帖心情 Post By:2013/9/14 12:11:00 [只看该作者]

是的!我在零件bom中每一行关联零件本表中引用的明细出来,然后就是右边的几个框框是有绑定BOM表中特定单元格的内容,行切换的时候,显示的内容应该是当前行的单元格内容。若果BOM设为主表可以实现,这个窗口主要是以查询为主,所有只能设为副表,可以副表没有这个功能,看如何设置才能实现这个功能啊?

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/9/14 14:37:00 [只看该作者]


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/9/14 14:41:00 [只看该作者]

论坛附件大小不能超过2M 你可以压缩后上传.

参考我给你做的,设置动态绑定即可 代码在窗口的ALterLoad事件

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:系统测试.zip




[此贴子已经被作者于2013-9-14 15:50:36编辑过]

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
  发帖心情 Post By:2013/9/16 14:10:00 [只看该作者]

为了达到零件BOM与零件本的关联,我在AfterLoad中添加如下代码,
可提示为“不存在名称为"BOM窗口_Table2"的Table"
或者提示“找不到名称为"ID"的列“
这是什么原因啊?
Dim t As Table = Tables("BOM窗口_Table2")
With Tables("零件BOM")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "ID = " & .Current("ID")
    End If
End With

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/9/16 20:34:00 [只看该作者]

 已在你的另一个帖子回答了你 8楼的问题

 回到顶部