设置稿纸的布局为单线条。
With ActiveDocument.PageSetup
.GenkoGrid = wpsGenkoGrid_Underline
End With