以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教复选框筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=116829)
--  作者：wakai
--  发布时间：2018/3/31 22:40:00
--  请教复选框筛选
With e.Form.Controls("是否采购").Checked = True
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "是否采购 Like \'%" & .Value & "%\'"
    End If
End With
是否采购列同为逻辑列
提示“未找到类型“Boolean”的公共成员“Value”。”
请教老师哪里错了
--  作者：小美菜
--  发布时间：2018/3/31 22:47:00
--  
With e.Form.Controls("是否采购").Checked = True
这个好像不对吧！ with后面应该为控件，而非具体的值
引用时会变成e.Form.Controls("是否采购").Checked = True.Value
--  作者：有点甜
--  发布时间：2018/4/1 17:52:00
--  

With e.Form.Controls("是否采购")
    If Filter > "" Then
        Filter = Filter & " And "
    End If
    If .checked Then
        Filter = Filter & "是否采购 = true "
    Else
        Filter = Filter & "(是否采购 = false or 是否采购 is null)"
    End If
End With