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


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

主题:筛选

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


加好友 发短信
等级:七尾狐 帖子:1710 积分:11410 威望:0 精华:0 注册:2015/6/22 8:11:00
筛选  发帖心情 Post By:2021/1/13 10:43:00 [只看该作者]

老师,下面代码我想改成绝对值筛选。

Dim Cols,Vals As New List(of String)
Dim flt As String = "1=1"
For Each c As Col In Args(0).Cols
    If c.Visible = True
        cols.add(c.name)
    End If
Next
'生成查询条件
Vals.AddRange(Args(1).Replace("'","''").Replace("*","[*]").Split(","))  '查询值列表并保证其有效
Dim i As Integer = 0
For Each Val As String In Vals
    
    Dim temp As String = ""
    For Each c As String In Cols
        temp = temp & " Convert(" & c & ",'System.String') like '%" & Val & "%' Or"
    Next


flt = flt & " and ("& temp.SubString(0, temp.length-3) & ")"
Next
'msgbox(flt)
Return flt

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106673 积分:542554 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/13 10:59:00 [只看该作者]

请截图说明一下

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


加好友 发短信
等级:七尾狐 帖子:1710 积分:11410 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2021/1/13 11:15:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:image 1.png
图片点击可在新窗口打开查看
 

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106673 积分:542554 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/13 11:22:00 [只看该作者]

比如:

tables("表A").filter = "号码=‘334’"

 回到顶部