Function IExtendSurface( _
   ByVal EdgeCount As Integer, _
   ByRef EdgesToExtend As Edge, _
   ByVal ExtendLinear As Boolean, _
   ByVal EndCondition As Integer, _
   ByVal Dist As Double, _
   ByVal PUpToVtx As Vertex, _
   ByVal PUpToFace As Face _
) As Body2

Dim instance As IBody2
Dim EdgeCount As Integer
Dim EdgesToExtend As Edge
Dim ExtendLinear As Boolean
Dim EndCondition As Integer
Dim Dist As Double
Dim PUpToVtx As Vertex
Dim PUpToFace As Face
Dim value As Body2
 
value = instance.IExtendSurface(EdgeCount, EdgesToExtend, ExtendLinear, EndCondition, Dist, PUpToVtx, PUpToFace)

Body2 IExtendSurface( 
   int EdgeCount,
   ref Edge EdgesToExtend,
   bool ExtendLinear,
   int EndCondition,
   double Dist,
   Vertex PUpToVtx,
   Face PUpToFace
)

Body2^ IExtendSurface( 
&   int EdgeCount,
&   Edge^% EdgesToExtend,
&   bool ExtendLinear,
&   int EndCondition,
&   double Dist,
&   Vertex^ PUpToVtx,
&   Face^ PUpToFace
) 

Parameters

EdgeCount

Number of edges to extend

EdgesToExtend

Array of the selected edges to extend

ExtendLinear

True to extend the selected edges linearly along the tangent of the face at the edges; false to extend the selected edges in the same direction as the face

EndCondition

• 0 = Extend selected edges per value specified for Dist
• 1 = Extend selected edges to PUpToVtx
• 2 = Extend selected edges to PpUpToFace

Dist

 Distance by which to extend the selected edges (see Remarks)

PUpToVtx

Vertex up to which to extend the selected edges  (see Remarks)

PUpToFace

Face up to which to extend the selected edges (see Remarks)

Return Value

This method supports surface bodies only.

You can extend the edges by a specified distance or up to a vertex or up to a face.