筛选

三水木　发表于：2010-03-04 14:28:05 　

复制

怎么用combo控件筛选子窗体的数据

请老师帮我看看。

点击下载此附件

Top

无雨发表于：2010-03-04 15:05:55

点击下载此附件不敢称老师，你看合适不？

Top

access爱好者发表于：2010-03-04 16:15:25

Private Sub Combo2_AfterUpdate()
    Dim strWhere As String
    strWhere = ""
    If Not IsNull(Me.Combo2) Then strWhere = strWhere & "[日期] like'" & Me.Combo2 & "'"
    Me.Child0.Form.Filter = strWhere
    Me.Child0.Form.FilterOn = True
End Sub

Top

三水木发表于：2010-03-05 09:30:30

1楼的无雨，你做的东西我看了，跟我想要的不一样。不过还是谢谢你。

2楼的access爱好者，你写的命令我粘贴过来，还是不能筛选。还请帮忙测试下。

Top

access爱好者发表于：2010-03-05 09:37:59

点击下载此附件粘贴过来后要看看“事件过程”有没有？没有要加上。

Top

三水木发表于：2010-03-05 10:28:29

感谢access爱好者的修改。可以用了。

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

筛选