VS-VIEWにてできた複数のレポートをVSPrinterで取得分表示するには？

まな 2006-12-22 22:55:30 No: 134690

開発環境ＶＢ6.0 ＸＰプロフェッショナル
VS-VIEWでつくったレポートをフォームのVS-Printerに表示させることはできるのですが、それは一つのレポートだけで、レポートが４つなどあった場合
どうすれば取得したレポート数を表示できますか？

Option Explicit
Private Report_File As String

Private Sub Form_Load()

  Report_File = App.Path & "\Abcd.xml"

      VSReport.Load Report_File, "レポート１"
      VSReport.Load Report_File, "レポート２"
      VSReport.Load Report_File, "レポート３"
      VSReport.Load Report_File, "レポート４"

View_ReportPreview

End Sub

Private Function View_ReportPreview()

    If VSReport.IsBusy Then Beep: Exit Function
    VSReport.Render VSPrinter
    DoEvents

End Function
こうなると表示されるのは１ページだけです（最後に読み込んだレポート４だけ表示）