作者: todaynew 时间: 2010-8-19 17:00
select * from 水果表 where 水果 like "*西瓜*" and 产地 like "*河南*"作者: girder 时间: 2010-8-20 11:20 回复 todaynew 的帖子
我说的窗体里的查询作者: sgrshh29 时间: 2010-8-20 11:54
窗体里么,用me.filter:
me.filter="水果 like '*西瓜*' and 产地 like '*河南*'"
me.filteron=true作者: sgrshh29 时间: 2010-8-20 12:02
看了你的附件,把代码改为下面即可:
Private Sub Combo1_AfterUpdate()
Me.Child1.Form.Filter = "水果 like '" & IIf(IsNull(Me.Combo1), "*", Me.Combo1) & "' and 产地 like '" & IIf(IsNull(Me.Combo3), "*", Me.Combo3) & "'"
Me.Child1.Form.FilterOn = True
End Sub
Private Sub Combo3_AfterUpdate()
Me.Child1.Form.Filter = "水果 like '" & IIf(IsNull(Me.Combo1), "*", Me.Combo1) & "' and 产地 like '" & IIf(IsNull(Me.Combo3), "*", Me.Combo3) & "'"
Me.Child1.Form.FilterOn = True
End Sub