HorizontalDistanceFromText 属性

       

以磅为单位返回或设置图文框与环绕文字之间的水平距离。Single 类型,可读写。

示例

本示例在所选内容四周添加一个图文框,并将图文框与文字之间的水平距离设置为 12 磅。

Dim frmNew As Frame

Set frmNew = ActiveDocument.Frames.Add(Range:=Selection.Range)
frmNew.HorizontalDistanceFromText = 12

本示例为第一段添加一个图文框,并设置该图文框的多个属性。

Dim frmNew As Frame

Set frmNew = ActiveDocument.Frames.Add _
    (Range:=ActiveDocument.Paragraphs(1).Range)

With frmNew
    .HorizontalDistanceFromText = InchesToPoints(0.25)
    .VerticalDistanceFromText = InchesToPoints(0.25)
    .HeightRule = wdFrameAuto
    .WidthRule = wdFrameAuto
    .Borders.Enable = False
End With