Foxtable(狐表)用户栏目专家坐堂 → 页面集合中副本表的操作


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

主题:页面集合中副本表的操作

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


加好友 发短信
等级:三尾狐 帖子:672 积分:7885 威望:0 精华:0 注册:2016/6/11 11:10:00
页面集合中副本表的操作  发帖心情 Post By:2018/6/19 10:29:00 [只看该作者]

在页面集合控件中的page1页面里绑定A表,是以副本来绑定的,窗口1中按钮1的代码如下:
If Forms("窗口1").Controls("TabControl1").SelectedIndex = 1 Then
    Dim Filter As String
    With e.Form.Controls("TextBox1")
        If .Value IsNot Nothing Then
            If Filter > "" Then
                Filter = Filter & " And "
            End If
            Filter = Filter & "编号 like '%" & .Value & "%'"
        End If
    End With
    Tables("窗口1_Table1").Filter = Filter    
End If
按照上面的代码,点击按钮1,没有反应,第一次用页面集合控件不太懂,看来网上的帖子,没有发现类似的,所以麻烦老师帮解答一下  谢谢

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


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

直接写

 

    Dim Filter As String
    With e.Form.Controls("TextBox1")
        If .Value IsNot Nothing Then
            If Filter > "" Then
                Filter = Filter & " And "
            End If
            Filter = Filter & "编号 like '%" & .Value & "%'"
        End If
    End With
    Tables("窗口1_Table1").Filter = Filter   

 回到顶部