创建一个具有指定
FreeformBuilder 对象的几何特性的形状。返回一个代表新形状的
Shape 对象。
语法
表达式.ConvertToShape
表达式 一个代表 FreeformBuilder 对象的变量。
返回值
Shape
说明
对于 FreeformBuilder 对象,至少要应用一次 AddNodes 方法,然后才能使用
ConvertToShape 方法。
示例
本示例将一个有五个顶点的任意多边形添加到 myDocument
中。
示例代码 |
let myDocument = Worksheets.Item(1)
let shape1 = myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200)
shape1.AddNodes(msoSegmentCurve, msoEditingCorner, 380, 230, 400, 250, 450, 300)
shape1.AddNodes(msoSegmentCurve, msoEditingAuto, 480, 200)
shape1.AddNodes(msoSegmentLine, msoEditingAuto, 480, 400)
shape1.AddNodes(msoSegmentLine, msoEditingAuto, 360, 200)
shape1.ConvertToShape()
|