返回一个值，该值指示与指定节点关联的线段是直线段还是曲线段。 如果指定节点是曲线段的控制点，则该属性返回 msoSegmentCurve 。 只读 MsoSegmentType。
语法
表达式。SegmentType
表达 一个代表 ShapeNode 对象的变量。
备注
使用 SetSegmentType 方法来设置此属性的值。
示例
本示例将 myDocument 中第三个形状的所有直线段更改为曲线段。 第三个形状必须是任意多边形。
Set myDocument = Worksheets(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
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。