Foxtable(狐表)用户栏目专家坐堂 → [求助] 在窗口中的筛选问题


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

主题:[求助] 在窗口中的筛选问题

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


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

 你可以参考如下例子

 

http://www.foxtable.com/help/topics/1058.htm

 


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


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

以下是引用如意大帝在2014-8-14 14:07:00的发言:
谢谢,我需要在窗口中显示,直接修改比较方便。

 

 也是一样的,你先参考着做,做不好,就把你做一半的例子上传上来。


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


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

红色改成你的对应的表名

 

Dim Filter As String
With e.Form.Controls("TB1")
    If .Value IsNot Nothing Then
        Filter = "订单号 = '" & .Value & "'"
    End If
End With
If Filter > "" Then
    Tables("窗口1_Table1").Filter = Filter
End If


 回到顶部