以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  求逻辑列的窗口筛选代码写法。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=10712)

--  作者：zhaotao --  发布时间：2011/6/20 9:32:00 --  求逻辑列的窗口筛选代码写法。 示例文件为CaseStudy目录下的“窗口筛选.table”中，如果要筛选一逻辑列代码应怎样修改？

--  作者：狐狸爸爸 --  发布时间：2011/6/20 9:34:00 --   "逻辑列名 = True"

--  作者：zhaotao --  发布时间：2011/6/20 9:42:00 --   我在窗口中加了一复选框控件CheckBox1就是不知怎样引用这个复选框的值？

--  作者：blackzhu --  发布时间：2011/6/20 10:27:00 --   Dim Filter As String With e.Form.Controls("复选框名称")              Filter = "逻辑列名 = True"     End With If Filter > "" Then     Tables("表名").Filter = Filter End If  试试这样

--  作者：狐狸爸爸 --  发布时间：2011/6/20 10:30:00 --   Dim Filter As String Dim chk As WinForm.CheckBox = e.Form.Controls("CheckBox1") If chk.Checked Then     filter = "某列 = True" Else     Filter = "某列 = False" End If

--  作者：zhaotao --  发布时间：2011/6/20 10:37:00 --   多谢两位！我先试试。