Question

全部显示

在正在创建的任意多边形的末尾插入一个新段并添加定义该段的结点。可以使用该方法任意多次地为正在创建的任意多边形添加结点。当添加完结点后，使用ConvertToShape 方法创建刚定义的任意多边形。若要给创建好的任意多边形添加结点，请使用ShapeNodes 集合的Insert 方法。

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

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

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

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

msoSegmentCurve

msoSegmentLine

EditingType必选。MsoEditingType 类型。该顶点的编辑属性；如果SegmentType 是msoSegmentLine，则EditingType 必须为msoEditingAuto。

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，请不要指定该参数值。

示例

本示例在当前演示文稿的第一张幻灯片中添加一个具有五个顶点的任意多边形。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200)
 .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingCorner, _
 X1:=380, Y1:=230, X2:=400, Y2:=250, X3:=450, Y3:=300
 .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingAuto, _
 X1:=480, Y1:=200
 .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _
 X1:=480, Y1:=400
 .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _
 X1:=360, Y1:=200
 .ConvertToShape
End With