Function IReplaceSurfaces( _
   ByVal NFaces As Integer, _
   ByRef FaceArray As Face, _
   ByRef NewSurfArray As Surface, _
   ByRef SenseArray As Integer, _
   ByVal Tolerance As Double _
) As Boolean

Dim instance As IModeler
Dim NFaces As Integer
Dim FaceArray As Face
Dim NewSurfArray As Surface
Dim SenseArray As Integer
Dim Tolerance As Double
Dim value As Boolean
 
value = instance.IReplaceSurfaces(NFaces, FaceArray, NewSurfArray, SenseArray, Tolerance)

bool IReplaceSurfaces( 
   int NFaces,
   ref Face FaceArray,
   ref Surface NewSurfArray,
   ref int SenseArray,
   double Tolerance
)

bool IReplaceSurfaces( 
&   int NFaces,
&   Face^% FaceArray,
&   Surface^% NewSurfArray,
&   int% SenseArray,
&   double Tolerance
)