LineRuleBefore 属性

       

决定是否将每段第一行前面的行距设为指定的磅数或行数。可读写。MsoTriState 类型。

示例

本示例显示一个消息框,其中显示当前演示文稿第一张幻灯片第二个形状中文本段落前的间距设置。

With Application.ActivePresentation.Slides(1).Shapes(2).TextFrame
    With .TextRange.ParagraphFormat
        sb = .SpaceBefore
        If .LineRuleBefore Then
            sbUnits = " lines"
        Else
            sbUnits = " points"
        End If
    End With
End With
MsgBox "Current spacing before paragraphs: " & sb & sbUnits