Publisher) (FreeformBuilder 物件

代表正在建立中之自由圖形的幾何。

註解

使用 BuildFreeform圖形 的方法 若要傳回 FreeformBuilder 物件的集合。

使用 AddNodes 方法可將節點新增至手繪多邊形。 使用 ConvertToShape 方法則可建立在 FreeformBuilder 物件中定義的圖案，並將其新增到 Shapes 集合中。

範例

下列範例會將使用中文件內新增帶有四個線段的手繪多邊形。

Sub CreateNewFreeFormShape() 
 With ActiveDocument.Pages(1).Shapes.BuildFreeform( _ 
 EditingType:=msoEditingCorner, X1:=360, Y1:=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 
End Sub

方法

• AddNodes
• ConvertToShape

屬性

• 應用程式
• Parent

另請參閱

• Publisher 物件模型參考

支援和意見反應

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