office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access动态设置子窗体及筛选子窗体数据的技巧

2017-09-26 15:17:00
tmtony8
原创
26875

在Access开发中,子窗体的应用是一大特色,能非常方便地显示数据,筛选数据

有问到如何通过按钮筛选子窗体的值来进行查询(行),筛选列显示不同的字段


1、设置子窗体的数据源

通过动态设置子窗体的记录源,动态筛选数据。通过选择不同的订单号,筛选该订单号下的数据



Private Sub Command3_Click()
    Dim strSql As String
    strSql = "Select * from 订单明细表 where 订单号=" & Me.Text1 & ""
    Me.订单明细窗体.Form.RecordSource = strSql
    Me.订单明细窗体.Form.Requery
End Sub
解析:子窗体名为“订单明细窗体”,筛选的文本框为“Text1”。通过RecordSource来动态设置记录源



2.动态替换子窗体


Private Sub Command4_Click()
    Me.订单明细窗体.SourceObject = "查询.订单明细查询"
End Sub 

解析:为子窗体设置一个新的对象,一个名为"订单明细查询"的查询,这里也可以是一个表,或者是窗体。



    分享