Foxtable(狐表)用户栏目专家坐堂 → [求助]老师帮忙改下关于OR的代码


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

主题:[求助]老师帮忙改下关于OR的代码

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/4/3 10:15:00 [显示全部帖子]

Dim JH As WinForm.CheckedComboBox' = e.Form.Controls("CheckedComboBox_卷号")

 

Dim temp As String = "1=2"
For Each s As String In jh.text.Split(",")
    temp = temp & " or 卷号 like '%" & s & "%'"
Next

temp = "(" & temp & ")"
msgbox(temp)

 

Filter = "工序 in ('" & GX.Text.replace(",", "','") & "') And 牌号 In ('" & PH.Text.replace(",", "','") & "')  And " & temp & " And 起始时间  >= #" & dt1.Value & "# And 起始时间 < #" & dt2.Value.AddDays(1) & "# And 厚度 >=" & hd1.Value & " And 厚度 <=" & hd2.Value & "And 宽度 >=" & kd1.Value & " And 宽度 <=" & kd2.Value


 回到顶部