Access) (Report.Pages 属性

使用 Pages 属性可返回在报表中打印页码所需的信息。 Integer 型，可读/写。

语法

表达式。页面

表达 一个代表 Report 对象的变量。

备注

此属性仅在打印预览中或打印时才可用。

若要引用宏或 Visual Basic 中的 页面 属性，窗体或报表必须包含的文本框的 控件来源 属性设置为使用 页 的表达式中。 例如，可用下面的表达式作为 控件来源 属性设置为页面页脚中的文本框。

表达式	打印
=Page	页面页脚中的页码（例如 1、2、3）。
=“Page” & Page &“of” & Pages	页面页脚中的“第 n 页/共 nn 页”（例如，第 1 页/共 5 页、第 2 页/共 5 页）。
=Pages	表单中的总页数 (例如 5) 。

示例

下面的示例将显示一条消息，说明报表中共有多少页。 若要使此示例正常工作，报表必须包含一个文本框，其 ControlSource 属性设置为表达式 =Pages。 若要测试此示例，请将以下代码粘贴到“按字母顺序排列的产品列表”窗体的 Page 事件中。

Dim intTotalPages As Integer 
Dim strMsg As String 
 
intTotalPages = Me.Pages 
strMsg = "This report contains " & intTotalPages & " pages." 
MsgBox strMsg

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。