(Publisher) 的 ShapeNodes 物件

之所有 ShapeNode 集合 在指定之手繪多邊形物件。 每個 ShapeNode 物件代表線段的手繪多邊形中還是的控制點弧形線段的手繪多邊形的節點。

您可以手動或使用 Shapes.BuildFreeform 和 FreeformBuilder.ConvertToShape 方法來建立手繪多邊形。

註解

使用 節點 若要傳回 ShapeNodes 集合的屬性。 使用 節點 (索引) ，其中 index 是節點索引編號，可傳回單一 ShapeNode 物件。

使用 [ 插入 ] 建立新的節點並將其新增至 ShapeNodes 集合的方法。

範例

下列範例會刪除使用中文件上第三個圖案中的第四個節點。 這個範例正常執行，第三個圖案必須使用至少四個節點的手繪多邊形。

Sub DeleteShapeNode() 
 ActiveDocument.Pages(1).Shapes(3).Nodes.Delete Index:=4 
End Sub

下列範例會在使用中文件上圖案三的節點四之後，加入具有弧形線段的平滑節點。 為了讓本範例順利運作，圖案三必須是至少擁有四個節點的手繪多邊形。

Sub AddCurvedSmoothSegment() 
 ActiveDocument.Pages(1).Shapes(3).Nodes.Insert _ 
 Index:=4, SegmentType:=msoSegmentCurve, _ 
 EditingType:=msoEditingSmooth, X1:=210, Y1:=100 
End Sub

如果在使用中文件上第三個圖案中的第一個節點是角點，下列範例會讓順利點。 這個範例正常執行，第三個圖案必須的手繪多邊形。

Sub SetPointType() 
 With ActiveDocument.Pages(1).Shapes(3) 
 If .Nodes(1).EditingType = msoEditingCorner Then 
 .Nodes.SetEditingType Index:=1, EditingType:=msoEditingSmooth 
 End If 
 End With 
End Sub

方法

• Delete
• Insert
• 項目
• SetEditingType
• SetPosition
• SetSegmentType

屬性

• 應用程式
• 數目
• Parent

另請參閱

• Publisher 物件模型參考

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。