标题：[求助]筛选窗口不工作

Dim Filter As String

With e.Form.Controls("TextBox1")

    If .Value IsNot Nothing Then

        Filter = "姓名 = '" & .Value & "'"

    End If

End With

With e.Form.Controls("TextBox1")

    If .Value IsNot Nothing Then

        Tables("表名").Filter = "姓名 = '" & .Value & "'"

    End If

End With

以下是引用shihao821004在2009-1-19 13:26:00的发言：
想对姓名列筛选，
此主题相关图片如下：qq截图未命名.bmp


 

Dim Filter As String

With e.Form.Controls("TextBox1")

    If .Value IsNot Nothing Then

        Filter = "姓名 = '" & .Value & "'"

    End If

End With

请老师帮忙看下哪里的问题，谢谢

  你这个要筛选的是那张表都没有说明,这么会筛选呢?帮助中的窗口筛选列子中,下面的一小部分没有看见吗?再看看.