Foxtable(狐表)用户栏目专家坐堂 → [求助]关于 复选组合框 的查询公式


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

主题:[求助]关于 复选组合框 的查询公式

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2015/8/31 16:53:00 [显示全部帖子]

 If c.Name = ctl.Name Then
    if TypeOf ctl is WinForm.CheckedComboBox Then
      if  e.Form.Controls(ctl.Name).Text > "" then 
       dim s() as string =  e.Form.Controls(ctl.Name).Text.Split(",")
         dim f as string = "1=2"
         for each s1 as string in s
           f + = " Or " & c.Name & " Like '%" & s1 & "%'"
         next
          flt + = "And (" & f & ")"
      end if
    else
       你的代码
    end if     
end if
[此贴子已经被作者于2015/8/31 16:54:17编辑过]

 回到顶部