Foxtable(狐表)用户栏目专家坐堂 → 表达式筛选


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

主题:表达式筛选

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
表达式筛选  发帖心情 Post By:2015/9/6 19:27:00 [只看该作者]

[对方户名] In ('郭俊鹏')and[交易户名] In ('张三','李四','王五','李六'),可以在菜单或窗口中设计类似功能的代码吗?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/6 19:28:00 [只看该作者]

Tables("表A").Filter = "[对方户名] In ('郭俊鹏') and [交易户名] In ('张三','李四','王五','李六')"

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 11:06:00 [只看该作者]

做了一个,实现不了我想要的功能,能否帮我做一个呢,帮助里也没有
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:产品3.zip


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/16 11:11:00 [只看该作者]

If Typeof e.sender Is winform.Button Then
    Dim dr As DataRow = DataTables("高级筛选").find("筛选名称= '" & e.sender.Name & "'")
    If dr IsNot Nothing Then
        Functions.remove("函数")
        Dim Code As String
        Code = dr("筛选条件")
        Functions.Add("函数",Code)
        Functions.Complie()
        Functions.Execute("函数")
    End If
End If

 回到顶部