Foxtable(狐表)用户栏目专家坐堂 → 在筛选出来的可见表上在筛选,如何实现?谢谢


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

主题:在筛选出来的可见表上在筛选,如何实现?谢谢

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 14:16:00 [显示全部帖子]


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 14:52:00 [显示全部帖子]

Dim Filter As String = "你合成的条件"

if Tables("XXX").Filter > "" Then

    Filter = Filter & "(" & Tables("XXX").Filter & ")"

End if

Tables("XXX").Filter = Filter


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 15:00:00 [显示全部帖子]

就是你在筛选窗口中根据用户输入内容合成的筛选条件

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 15:06:00 [显示全部帖子]

如何合成?

你用窗口筛选,不要合成一个筛选表达式,然后赋值给Table的Filter属性吗?

 


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 15:27:00 [显示全部帖子]

我已经无语了

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 15:36:00 [显示全部帖子]

你都用三年时间了,基本功还不如一个刚接触foxtable的人。

 

Dim Filter As String
If e.Form.Controls("ComboBox1").Value IsNot Nothing Then
    Filter = "序号 = " & e.Form.Controls("ComboBox1").Value
End If
If e.Form.Controls("ComboBox2").Value IsNot Nothing Then
    If Filter > "" Then
        Filter = Filter & " And "
    End If
    Filter = "序号1 = " & e.Form.Controls("ComboBox2").Value
End If
If Filter > "" Then
    If Tables("表C").Filter > "" Then
        Filter = Filter & " And (" & Tables("表C").Filter & ")"
    End If
    Tables("表C").Filter = Filter
End If


 回到顶部