Accent 属性

决定垂直强调线是否分隔标注文本与标注线。可读写。MsoTriState 类型。

expression  必选。该表达式返回“应用于”列表中的对象之一。

示例

本示例在 myDocument 中添加一个椭圆和指向该椭圆的标注。标注文本没有边界，但包含将文本与标注线分隔开的垂直强调线。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
    .AddShape msoShapeOval, 180, 200, 280, 130
    With .AddCallout(msoCalloutTwo, 420, 170, 170, 40)
        .TextFrame.TextRange.Text = "My oval"
        With .Callout
            .Accent = msoTrue
            .Border = msoFalse
        End With
    End With
End With