DistanceFromBottom 属性

       

返回或设置文本与边框底边的距离(以磅为单位)。Long 类型,可读写。

注意   为页面边框设置本属性时,既可设置为文本与页面边框底边的距离,也可设置页面底边与页面边框底边的距离。用何种参照来设置该距离,取决于 DistanceFrom 属性的值。

示例

本示例为活动文档的第一个段落添加边框,并将文本与底边边框的距离设置为 6 磅。

With ActiveDocument.Paragraphs(1).Borders
    .Enable = True
    .DistanceFromBottom = 6
End With

本示例为 Sales.doc 中的每张表格添加边框。然后将文本与上下边框的距离设置为 3 磅,将文本与左右边框的距离设置为 6 磅。

Dim tableLoop As Table

For Each tableLoop In Documents("Sales.doc").Tables
    With tableLoop.Borders
        .OutsideLineStyle = wdLineStyleSingle
        .OutsideLineWidth = wdLineWidth150pt
        .DistanceFromBottom = 3
        .DistanceFromTop = 3
        .DistanceFromLeft = 6
        .DistanceFromRight = 6
    End With
Next tableLoop