SegmentType 属性

       

返回一个值,该值表示与指定结点相关联的段是直还是曲。只读。MsoSegmentType 类型。

expression.SegmentType

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

说明

该属性为只读。可使用 SetSegmentType 方法设置该属性的值。

示例

本示例将 myDocument 中第三个形状的所有直段更改为曲段。第三个形状必须是任意多边形。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3).Nodes
    n = 1
    While n <= .Count
        If .Item(n).SegmentType = msoSegmentLine Then
            .SetSegmentType n, msoSegmentCurve
        End If
        n = n + 1
    Wend
End With