Dim instance As IFeatureManager
Dim Closed As System.Boolean
Dim KeepTangency As System.Boolean
Dim ForceNonRational As System.Boolean
Dim TessToleranceFactor As System.Double
Dim StartMatchingType As System.Short
Dim EndMatchingType As System.Short
Dim StartTangentLength As System.Double
Dim EndTangentLength As System.Double
Dim StartTangentDir As System.Boolean
Dim EndTangentDir As System.Boolean
Dim IsThinBody As System.Boolean
Dim Thickness1 As System.Double
Dim Thickness2 As System.Double
Dim ThinType As System.Short
Dim Merge As System.Boolean
Dim UseFeatScope As System.Boolean
Dim UseAutoSelect As System.Boolean
Dim GuideCurveInfluence As System.Integer
Dim value As Feature
value = instance.InsertProtrusionBlend2(Closed, KeepTangency, ForceNonRational, TessToleranceFactor, StartMatchingType, EndMatchingType, StartTangentLength, EndTangentLength, StartTangentDir, EndTangentDir, IsThinBody, Thickness1, Thickness2, ThinType, Merge, UseFeatScope, UseAutoSelect, GuideCurveInfluence) |