本示例显示当前页的页脚。

ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.ActiveWindow.View
    .Type = wpsPrintView
    .SeekView = wpsSeekCurrentPageFooter
End With