本示例激活活动窗口中所有窗体域的域底纹。

ActiveDocument.ActiveWindow.View.FieldShading = wpsFieldShadingAlways