レポートのレコードソースにデータが1件も無い場合、
表示または印刷を行わないようにするには、イベント「NoData」を利用します。

　レポートのプロパティシートを表示すると、[イベント]タブに[空データ時]
があります。そのイベントに次のようなイベントプロシージャを作成すると、
レポートを表示または印刷する際にデータが1件も無かったら､
メッセージボックスが表示され、表示または印刷がキャンセルされます。

● サンプル ●

Private Sub Report_NoData(Cancel As Integer)
    MsgBox "データがありません。"
    Cancel = True
End Sub