解決方案

可以通過將記錄源屬性設(shè)為表、查詢或 SQL SELECT 語句的名稱，模擬將報表綁定到 DAO 記錄集對象。 如果您想使用與您打開的 DAO 記錄集的相同報表源，請將報表的記錄源屬性設(shè)為 DAO 記錄集的名稱屬性。 下面的示例說明了如何打開基于查詢的 DAO 記錄集，以及如何將報表的記錄源屬性設(shè)為與記錄集相同的源。

Microsoft 所提供的編程示例只用于說明目的，不附帶任何明示或默示的保證，包括（但不限于）用于特定目的的適用性和/或適銷性的各項默示保證。 本文假定您對演示所用的編程語言和創(chuàng)建、調(diào)試程序所用的工具已經(jīng)非常熟悉。 Microsoft 的支持人員可以幫助解釋某個特定程序的功能，但他們不會修改這些示例來增加功能，也不會重新構(gòu)造程序來滿足特殊的要求。 如果您的編程經(jīng)驗有限，那么您可能需要與 Microsoft 認證伙伴聯(lián)系或者撥打 Microsoft 收費咨詢電話（800）936-5200。有關(guān) Microsoft 認證伙伴的更多信息，請訪問以下網(wǎng)頁：

http://www.microsoft.com/partner/referral/

有關(guān) Microsoft 提供的支持選項的詳細信息，請訪問以下網(wǎng)頁：

http://support.microsoft.com/directory/overview.asp

1. 注意事項：執(zhí)行本文中的步驟將會修改示例數(shù)據(jù)庫 Northwind.mdb。需要備份 Northwind.mdb 文件，并在數(shù)據(jù)庫副本上執(zhí)行這些步驟。
   
   
2. 打開示例數(shù)據(jù)庫 Northwind.mdb。
3. 當主切換面板窗體出現(xiàn)時將其關(guān)閉。
4. 在視圖菜單上，指向數(shù)據(jù)庫對象，然后單擊報表。
5. 在“數(shù)據(jù)庫”窗口中，單擊按漢語拼音順序的產(chǎn)品列表 報表，然后單擊設(shè)計。
6. 在視圖菜單上，單擊屬性以顯示屬性頁。
7. 在編輯菜單中，單擊選擇報表以驗證所顯示的屬性頁是否為報表的屬性頁。
8. 單擊數(shù)據(jù)選項卡，然后清除記錄源屬性。
9. 在視圖菜單上，單擊代碼，查看窗體的模塊。
10. 向模塊中添加以下代碼：

    Private Sub Report_Open(Cancel As Integer)
        Dim db As DAO.Database
        Dim rs As DAO.Recordset
        
        Set db = CurrentDb
        
        'Open a DAO recordset based on the Alphabetical List of Products query
        Set rs = db.OpenRecordset("按漢語拼音順序的產(chǎn)品列表", dbOpenDynaset)
        Me.RecordSource = rs.Name
    End Sub

11. 在文件菜單上，單擊關(guān)閉并返回到 Microsoft Access。
12. 在文件菜單上，單擊保存，然后關(guān)閉報表。
13. 在打印預(yù)覽中打開“按漢語拼音順序的產(chǎn)品列表”報表。

注意，該報表綁定到“按漢語拼音順序的產(chǎn)品列表”查詢中的數(shù)據(jù)，該查詢是 DAO 記錄集對象的源。