当运行报表时，如果它的数据源不包含任何记录，该报表将显示一个空页，即没有任何数据的页。这种情况下，您可能希望显示消息框，而根本不希望显示一个空白的报表。

方法一、使用嵌入的宏

在设计视图或布局视图中打开报表。

如果属性表未显示， 请按 F4 以显示它。

在该属性表上， 单击“事件”选项卡。

单击“无数据”。

单击...。

在“选择生成器”对话框中， 单击“宏生成器”，然后单击“确定”。

输入下表中的操作和参数。

操作	参数
MsgBox	“未找到任何记录。”、“是”、“信息”、“无数据”
CancelEvent	[无参数]

请注意，上表显示的是出现在“参数”列中的参数。它们实际是在“操作参数”下输入的，详见下表。

操作参数	值
消息	未找到任何记录。
发嘟嘟声	是
类型	信息
标题	无数据

单击“关闭”。

宏生成器关闭，“无数据”事件显示“[嵌入的宏]”。

保存并关闭报表。

方法二、利用报表的"无数据"属性,代码如下:

Private Sub Report_NoData(Cancel As Integer)

    Beep
        MsgBox "未找到任何记录。", vbInformation, "无数据"
        DoCmd.CancelEvent

End Sub

下一次运行报表时，如果找不到任何记录，将显示此消息框。在消息框中单击“确定”时，报表取消，并且不显示空页。