本示例将活动窗口切换到页面视图,并显示文本边界线。

With ActiveDocument.ActiveWindow.View
    .Type = wpsPrintView
    .ShowTextBoundaries = True
End With