以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]筛选的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87883)

--  作者:cqusand
--  发布时间:2016/7/21 21:39:00
--  [求助]筛选的问题
求指点怎么从多列中筛选同一个内容 表示或的关系? 看看这个代码该怎么改?

Dim Value() As String
Value = e.Node.FullPath.Split("\\")
Select Case e.Node.Level
    Case 0
         Tables("任务信息").Filter = "[分配给] = \'" & Value(0) & "\'"  
  Case 0
         Tables("任务信息").Filter = "[申请人] = \'" & Value(0) & "\'"  
End Select

--  作者:大红袍
--  发布时间:2016/7/21 21:45:00
--  

 没看懂你的意思

 

Dim Value() As String
Value = e.Node.FullPath.Split("\\")
Tables("任务信息").Filter = "[分配给] = \'" & Value(0) & "\' or [申请人] = \'" & Value(0) & "\'"  

--  作者:cqusand
--  发布时间:2016/7/21 22:02:00
--  
就是这样的,谢谢大红袍。