查询问题

sfyghl

小弟问个比较麻烦得问题，创建一个窗体。
里面放入一个选项卡控件，分2页
页1里放入一个窗体，和一个子窗体，一个查询按钮，窗体里创建2个文本“姓名”和“年龄”，比如我在姓名里输入“小明”，下面的子窗体就会显示出小明的记录。
If Not IsNull(Me.姓名) Then
        strWhere = strWhere & "([姓名] like '*" & Me.姓名 & "*') AND "
    End If
页2里同样放入一个窗体，一个查询，一个子窗体，窗体里创建2个文本“学校”和“班级”，功能同页1一样。

问题来了哈，如果我把页2里的按钮去掉，统一用页1的按钮去查询，就是说要同时满足页1和页2的条件的记录才会被显示出来，显示的子窗体还是页1显示“姓名”“年龄”，页2的显示“学校”“班级”。
请问这可以实现吗？
如果可以的话，请尽量用实例代码写一下。。。小弟初学者。。感激不尽~

sfyghl

用me.filter，要怎么用啊？

tz-chf

再加一句，允许过滤=true

sfyghl

刚写不清楚，我又编辑了一下，这回问题比较清晰`

nbmos

Me.子窗体名.Form.Filter = strWhere
    Me.子窗体名.Form.FilterOn = True