Foxtable(狐表)用户栏目专家坐堂 → [求助]条件表达式中的这种包含如何写


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

主题:[求助]条件表达式中的这种包含如何写

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
[求助]条件表达式中的这种包含如何写  发帖心情 Post By:2020/4/14 22:45:00 [只看该作者]

假定有个公司表,有条记录,其经营产品种类列中填入了  “A,B”,代表此公司同时经营A与B 二个产品
现在有个查询窗口,窗口中有个  CheckedComboBox控件,其下拉的内容有 A,B,C。。。
现在勾选 A与C,代表要查询经营A或C产品的公司
我现在希望能查到这家经营“A,B”的公司,因为此公司经营的产品中包含A,应被查询到
条件表达式应该如何写?
谢谢!
[此贴子已经被作者于2020/4/14 22:46:42编辑过]

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


加好友 发短信
等级:超级版主 帖子:107031 积分:544386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/14 23:02:00 [只看该作者]

Dim s As String = "A,C"
Dim filter As String = "1=2 "
For Each s1 As String In s.split(",")
    filter = filter & " or ','+产品+',' like '%," & s1 & ",%' "
Next
Output.Show(filter)

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
  发帖心情 Post By:2020/4/14 23:13:00 [只看该作者]

老师,你的代码我看懂了,这是我下面改的,不知改的对不对,上班了,项目不在手边,无法测试
实际项目中,查询条件还有好几个,类别只是其中之一

Dim ccb类别 As WinForm.CheckedComboBox = e.Form.Controls("CheckedComboBox_类别")
Dim s as String = ccb类别.Text
Dim flt As String = "1=1"
Dim filter As String = "1=2 "
If ccb类别.Value = "全选" OrElse ccb类别.Value = "" Then
    flt = flt
Else
For Each s1 As String In s.split(",")
    filter = filter & " or ','+类别+',' like '%," & s1 & ",%' "
Next
flt = flt And "(" & filter & ")"
End If
[此贴子已经被作者于2020/4/15 8:21:01编辑过]

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


加好友 发短信
等级:超级版主 帖子:107031 积分:544386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/15 8:29:00 [只看该作者]

Dim s As String = e.Form.Controls("CheckedComboBox_类别").Text
Dim filter As String = "1=2 "
If s = "全选" OrElse s = "" Then
filter = ""
else
filter = "1=2 "
For Each s1 As String In s.split(",")
    filter = filter & " or ','+类别+',' like '%," & s1 & ",%' "
Next
end if
Output.Show(filter)
[此贴子已经被作者于2020/4/15 8:29:07编辑过]

 回到顶部