以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  checkedcombobox问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=132234)
--  作者：ezilu
--  发布时间：2019/3/17 20:12:00
--  checkedcombobox问题
比如：表A
  手术类型  全刀医师   全刀费用  主刀医师    主刀费用   第一助手   助手费用  
 冠脉造影,支架植入      李四     200   王五  100 
   支架植入 李四   300             

有颜色的这列是checkedcombobox类型

Dim yztcs As Double = DataTables("患者信息").Compute("count(患者姓名)","第一助手 = \'" & ssys.Value & "\' And 手术类型 = \'" & sslx.Value & "\'")


这个红色区域 怎么写判断句，应该要用 .Contains  语法把  怎么写？





请教大大们，谢谢




[此贴子已经被作者于2019/3/17 21:12:08编辑过]
--  作者：ezilu
--  发布时间：2019/3/17 21:12:00
--  
大大们  能帮下忙吗
--  作者：有点甜
--  发布时间：2019/3/18 10:26:00
--  

参考代码

 

Dim str As String = "1,2,3,4,5"

Dim nstr As String = ""

For Each s As String in str.split(",")

    nstr &= " or 第一列 like \'%" & s & "%\'"

Next

nstr = nstr.substring(3)

msgbox(nstr)