Accent 属性

如果有强调线分开标注线和标注文字，则此属性为 True。MsoTriState，可读写。

示例

本示例实现的功能是：向活动文档添加一个椭圆和指向该椭圆的标注。标注文本不带有边框，但有一条强调线将文本和标注线隔开。

Dim shapeCallout As Shape

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