Insert 方法

在任意多边形的指定结点后插入一条新段。

expression.Insert(Index, SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)

expression 必选。该表达式返回一个 ShapeNodes 对象。

Index 必选。Long 类型。新结点的插入位置前的结点。

SegmentType 必选。MsoSegmentType 类型。要添加的段的类型。

MsoSegmentType 可以是下列 MsoSegmentType 类型常数之一。

msoSegmentCurve

msoSegmentLine

EditingType 必选。MsoEditingType 类型。顶点的编辑属性。

MsoEditingType 可以是下列 MsoEditingType 类型常数之一（不能是 msoEditingSmooth 或 msoEditingSymmetric）。

msoEditingAuto

msoEditingCorner

X1 必选。Single 类型。如果新段的 EditingType 为 msoEditingAuto，则此参数指定从文档左上角到新段终点的水平距离（以磅为单位）。如果新结点的 EditingType 为 msoEditingCorner，则此参数指定从文档左上角到新段的第一个控制点的水平距离（以磅为单位）。

Y1 必选。Single 类型。如果新段的 EditingType 为 msoEditingAuto，则此参数指定从文档左上角到新段的终点的垂直距离（以磅为单位）。如果新结点的 EditingType 为 msoEditingCorner，此参数指定从文档左上角到新段的第一个控制点的垂直距离（以磅为单位）。

X2 可选。Single 类型。如果新段的 EditingType 为 msoEditingCorner，则此参数指定从文档左上角到新段第二个控制点的水平距离（以磅为单位）。如果新段的 EditingType 为 msoEditingAuto，请不要指定该参数值。

Y2 可选。Single 类型。如果新段的 EditingType 为 msoEditingCorner，此参数指定从文档左上角到新段第二个控制点的垂直距离（以磅为单位）。如果新段的 EditingType 为 msoEditingAuto，请不要指定该参数值。

X3 可选。Single 类型。如果新段的 EditingType 为 msoEditingCorner，则此参数指定从文档左上角到新段终点的水平距离（以磅为单位）。如果新段的 EditingType 为 msoEditingAuto，请不要指定该参数值。

Y3 可选。Single 类型。如果新段的 EditingType 为 msoEditingCorner，则此参数指定从文档左上角到新段终点的垂直距离（以磅为单位）。如果新段的 EditingType 为 msoEditingAuto，请不要指定该参数值。

示例

本示例在 myDocument 中第三个形状的第四个结点后添加一个带有一段曲线的平滑结点。第三个形状必须是至少有四个结点的任意多边形。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3).Nodes
    .Insert Index:=4, SegmentType:=msoSegmentCurve, _
        EditingType:=msoEditingSmooth, X1:=210, Y1:=100
End With