Foxtable(狐表)用户栏目专家坐堂 → ComboBox筛选相关


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

主题:ComboBox筛选相关

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


加好友 发短信
等级:童狐 帖子:219 积分:1890 威望:0 精华:0 注册:2011/6/10 9:12:00
ComboBox筛选相关  发帖心情 Post By:2011/8/8 11:33:00 [只看该作者]

Dim Filter As String
With e.Form.Controls("ComboBox5")
    If .Value IsNot Nothing Then
        Filter = "服务包ID = '" & .Value & "'"
        Filter = " And [客户ID] Is Null"
    End If
End With

 

这个怎么执行两个条件的筛选

代码这样写有错吗


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


加好友 发短信
等级:童狐 帖子:219 积分:1890 威望:0 精华:0 注册:2011/6/10 9:12:00
  发帖心情 Post By:2011/8/8 11:34:00 [只看该作者]

执行后出现缺少操作数

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


加好友 发短信
等级:童狐 帖子:219 积分:1890 威望:0 精华:0 注册:2011/6/10 9:12:00
  发帖心情 Post By:2011/8/8 11:41:00 [只看该作者]

Dim Filter As String
With e.Form.Controls("ComboBox5")
    If .Value IsNot Nothing Then
       Filter = "[客户ID] Is Null  And 服务包ID = '" & .Tables("服务包明细").current("服务包ID") & "'"
    End If
End With

这样写还是出差

出差为“未找到ComboBox 的共用成员Tables”


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/8 11:42:00 [只看该作者]

Dim Filter As String
With e.Form.Controls("ComboBox5")
    If .Value IsNot Nothing Then
         Filter = "服务包ID = '" & .Value & "'"
         Filter = Filter & " And [客户ID] Is Null"
    End If
End With


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


加好友 发短信
等级:童狐 帖子:219 积分:1890 威望:0 精华:0 注册:2011/6/10 9:12:00
  发帖心情 Post By:2011/8/8 11:47:00 [只看该作者]

谢谢狐爸

昨天搞了一个晚上,今天终于解决了


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2011/8/8 12:38:00 [只看该作者]

With e.Form.Controls("cmbEmployee")
    If
.Value IsNot Nothing Then
        If
Filter >"" Then
            Filter = Filter &
" And "
       
End If
        Filter = Filter &
"雇员 = '" & .Value & "'"
   
End If
End
With

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


加好友 发短信
等级:童狐 帖子:219 积分:1890 威望:0 精华:0 注册:2011/6/10 9:12:00
  发帖心情 Post By:2011/8/8 12:39:00 [只看该作者]

图片点击可在新窗口打开查看
blackzhu谢谢你的帮助

 回到顶部