VB 5.0附帶的Crystal Reports 4.x提供了對Recordset對象的支持。若要實現數據控件的報表輸出，需要使用Crystal Reports的ActiveX控件。所以，你需要先從控件列表中選擇Crystal Reports Control 4.6，放一個控件在Form中，并設置好Data控件的有關屬性。 
    設置Crystal Reports控件的DataSource屬性為Data控件(如Data1)，再設置ReportSource屬性為3。若ReportSource屬性為0，表示使用報表文件，若為3表示數據控件。在運行時，調用CrystalReport1.Action = 1就可以輸出報表。與此相關的屬性還有BoundReportFooter和BoundReportHeading，它們決定是否打印頁眉和頁腳。當然，采用這種形式輸出的報表絕對稱不上美觀。 
    若要使報表美觀，需要對報表格式進行修改。如果在設計時改變報表格式，在完成對Crystal Reports控件的設計后，選擇Custom（自定義）屬性，在屬性頁對話框中選擇Data-Bound Report標簽(見圖)，按Save Report As按鈕，將數據保存為報表樣板。在Crystal Reports Desiner中打開該樣板，修改字體等屬性，使報表更美觀。打印修改后的報表的方法同前面的方法不同，應將ReportSource屬性為0，將ReportFileName設為報表樣板文件。報表樣板也可以在程序運行時生成。首先如前設置好Crystal Reports控件，將打印輸出Destination屬性設為0，即Preview Window，運行程序，在打印預覽窗口選Export按鈕，以.RPT格式輸出。編輯和打印該報表樣本的方法同前。Crystal Report對于這種自定義格式的報表有一個限制，就是Data控件的RecordSource屬性在報表修改前后不能改變。 
<END>