本示例实现的功能是:设置网格的水平和垂直起点,以及网格线之间的水平和垂直距离,并为当前文档启用“对齐网格”功能。
With ActiveDocument
    .GridOriginHorizontal = 80
    .GridOriginVertical = 90
    .GridDistanceHorizontal = 9
    .GridDistanceVertical = 9
    .SnapToGrid = True
End With