Foxtable(狐表)用户栏目专家坐堂 → [求助]检查框作查询筛选


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

主题:[求助]检查框作查询筛选

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


加好友 发短信
等级:婴狐 帖子:39 积分:420 威望:0 精华:0 注册:2011/11/19 16:31:00
[求助]检查框作查询筛选  发帖心情 Post By:2011/12/25 20:08:00 [只看该作者]

请问高手,在一个表中,有多列是逻辑列,我设计了一个查询的窗体,用检查框作为查询条件的选择,可以选择任意个条件,类似文本框输入的代码应该怎么改?

With e.Form.Controls("CheckBox1")
   If .Value IsNot Nothing Then
        If Filter =0 Then
            Filter = Filter & " And "
        End If 
        Filter = Filter & "条件1= '" & .Value & "'"
    End If
End With

 

……


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


加好友 发短信
等级:婴狐 帖子:99 积分:1589 威望:0 精华:0 注册:2011/9/19 0:57:00
  发帖心情 Post By:2011/12/25 20:38:00 [只看该作者]

建议用ComboBox作为查询条件的选择的输入,简单,明了。

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2011/12/25 23:49:00 [只看该作者]

和帮助中的筛选代码差不多,注意下面的不同之处。

 

With e.Form.Controls("CheckBox1")
    If .Checked = True Then
        Filter = "条件1= true "
    End If
End With


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


加好友 发短信
等级:幼狐 帖子:132 积分:2250 威望:0 精华:0 注册:2008/9/1 8:41:00
  发帖心情 Post By:2011/12/26 8:35:00 [只看该作者]

以下是引用czy在2011-12-25 23:49:00的发言:

和帮助中的筛选代码差不多,注意下面的不同之处。

 

With e.Form.Controls("CheckBox1")
    If .Checked = True Then
        Filter = "条件1= true "
    End If
End With

 

可以了,非常感谢!


 回到顶部