我想问一下， 为什么这样查询。 不显示效果。？在窗口中也有一个table控件，但是不显示效果， 但是在表里是有显示的
开发者：136922
在添加产品的窗口的查询上面，
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
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
[此贴子已经被作者于2014-5-9 13:20:40编辑过]
加好友 
发短信
Post By：2014/5/9 12:37:00 [只看该作者]
