本示例将活动文档上边距转换为英寸,并在消息框中显示结果。
MsgBox PointsToInches(ActiveDocument.Sections(1) _
.PageSetup.TopMargin)