はじめまして。

現在、VB6proとACCESS2000を使用しデータベースの
検索システムを製作しています。
検索一覧をグリッドに表示し、情報を選ぶと次の画面へ移り
詳細情報が表示されるというものです。
問題は詳細情報の印刷をさせているのですが、データベース
にあるデータを1から印刷してしまいます。
すべてを印刷するわけではなく選択した（表示している）デ
ータのみを印刷するようにしたいのです。
なんども手直しをしましたが直りません。
どのようなコーディングをすればよいか皆様に教えていただ
けたら幸いです。

Set DataReport1.DataSource = frm検索.rs

' レポートを表示（プレビュー）する
DataReport1.Show

という風にコーディングしています。

よろしくお願いします。