以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口筛选问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=5795)
--  作者：wqc360
--  发布时间：2010/1/15 21:07:00
--  窗口筛选问题

我窗口有两个组合框控件，分别绑定在要筛选表的父表相关列，怎么在控件ValueChanged和TextChanged事件中设置如下代码，都不成功。
Dim Filter As String
With e.Form.Controls("图号")
    If .Value IsNot Nothing Then
        Filter = "图号 = #" & .Value & "#"
    End If
End With
With e.Form.Controls("序号")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "工序_序号 = \'" & .Value & "\'"
    End If
End With
If Filter > "" Then
    Tables("产品工艺").Filter = Filter
End If
--  作者：yangming
--  发布时间：2010/1/15 22:02:00
--  
你的表中图号列是日期吗？此代码可放在按钮中
[此贴子已经被作者于2010-1-15 22:02:18编辑过]
--  作者：wqc360
--  发布时间：2010/1/15 22:11:00
--  
图号列是字符型
--  作者：yangming
--  发布时间：2010/1/15 23:35:00
--  
 字符型 就应该这样写
Filter = "图号 =\'" & .Value & "\'"
--  作者：wqc360
--  发布时间：2010/1/15 23:54:00
--  
原来如此，我明天试试，谢谢yangming版。