Word VBA教程:SegmentType属性

该属性的返回值表示与指定顶点相关联的线段是直线或曲线。MsoSegmentType,只读。

MsoSegmentType 可以是下列 MsoSegmentType 常量之一:
msoSegmentCurve
msoSegmentLine

expression.SegmentType

expression   必需。该表达式返回一个ShapeNode对象。

说明

如果指定顶点是曲线段的控点,则此属性返回 msoSegmentCurve。

可用SetSegmentType方法设置此属性的值。

VBA示例

本示例将myDocument 中图形 3 的所有直线段更改为曲线段。图形 3 必须是任意多边形。


Set myDocument = ActiveDocument
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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号