office交流網(wǎng)--QQ交流群號(hào)

Access培訓(xùn)群:792054000         Excel免費(fèi)交流群群:686050929          Outlook交流群:221378704    

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

Access動(dòng)態(tài)設(shè)置子窗體及篩選子窗體數(shù)據(jù)的技巧

2017-09-26 15:17:00
tmtony8
原創(chuàng)
28010

在Access開發(fā)中,子窗體的應(yīng)用是一大特色,能非常方便地顯示數(shù)據(jù),篩選數(shù)據(jù)

有問到如何通過按鈕篩選子窗體的值來進(jìn)行查詢(行),篩選列顯示不同的字段


1、設(shè)置子窗體的數(shù)據(jù)源

通過動(dòng)態(tài)設(shè)置子窗體的記錄源,動(dòng)態(tài)篩選數(shù)據(jù)。通過選擇不同的訂單號(hào),篩選該訂單號(hào)下的數(shù)據(jù)



Private Sub Command3_Click()
    Dim strSql As String
    strSql = "Select * from 訂單明細(xì)表 where 訂單號(hào)=" & Me.Text1 & ""
    Me.訂單明細(xì)窗體.Form.RecordSource = strSql
    Me.訂單明細(xì)窗體.Form.Requery
End Sub
解析:子窗體名為“訂單明細(xì)窗體”,篩選的文本框?yàn)椤癟ext1”。通過RecordSource來動(dòng)態(tài)設(shè)置記錄源



2.動(dòng)態(tài)替換子窗體


Private Sub Command4_Click()
    Me.訂單明細(xì)窗體.SourceObject = "查詢.訂單明細(xì)查詢"
End Sub 

解析:為子窗體設(shè)置一個(gè)新的對象,一個(gè)名為"訂單明細(xì)查詢"的查詢,這里也可以是一個(gè)表,或者是窗體。



    分享
    文章分類
    聯(lián)系我們
    聯(lián)系人: 王先生
    Email: 18449932@qq.com
    QQ: 18449932
    微博: officecn01
    移動(dòng)訪問