Foxtable(狐表)用户栏目专家坐堂 → 窗口表内容不更新


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

主题:窗口表内容不更新

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/23 9:52:00 [显示全部帖子]

在表的positionChanged事件加入代码

 

If Forms("产品尺寸制作").Opened Then
    Forms("产品尺寸制作").Controls("Table1").Table.Filter = "产品编号 = '" & "' Or _Identify = " & e.Table.Rows(0)("_Identify")'窗口与表显示编号对于的行.,还有第一行.
    'Forms("产品尺寸制作").Controls("TabControl1").SelectedPage = Forms("产品尺寸制作").Controls("TabControl1").TabPages("表格方式")
End If
'
If Forms("产品尺寸制作").Opened Then
    Forms("产品尺寸制作").Controls("Table2").Table.Filter = "产品编号 = '" & e.Table.Current("商品信息_档案号") & "' Or _Identify = " & e.Table.Rows(0)("_Identify")'窗口与表显示编号对于的行.,还有第一行.

    'Forms("产品尺寸制作").Controls("TabControl1").SelectedPage = Forms("产品尺寸制作").Controls("TabControl1").TabPages("表格方式")
End If

If Forms("产品尺寸制作").Opened Then
    Forms("产品尺寸制作").Controls("Table3").Table.Filter = "产品编号 = '" & e.Table.Current("商品信息_档案号") & "' Or _Identify = " & e.Table.Rows(0)("_Identify")'窗口与表显示编号对于的行,还有第一行.
    'Forms("产品尺寸制作").Controls("TabControl1").SelectedPage = Forms("产品尺寸制作").Controls("TabControl1").TabPages("表格方式")
End If


 回到顶部