Sub InsertRib( _
   ByVal Is2Sided As Boolean, _
   ByVal ReverseThicknessDir As Boolean, _
   ByVal Thickness As Double, _
   ByVal ReferenceEdgeIndex As Integer, _
   ByVal ReverseMaterialDir As Boolean, _
   ByVal IsDrafted As Boolean, _
   ByVal DraftOutward As Boolean, _
   ByVal DraftAngle As Double _
) 

Dim instance As IModelDoc2
Dim Is2Sided As Boolean
Dim ReverseThicknessDir As Boolean
Dim Thickness As Double
Dim ReferenceEdgeIndex As Integer
Dim ReverseMaterialDir As Boolean
Dim IsDrafted As Boolean
Dim DraftOutward As Boolean
Dim DraftAngle As Double
 
instance.InsertRib(Is2Sided, ReverseThicknessDir, Thickness, ReferenceEdgeIndex, ReverseMaterialDir, IsDrafted, DraftOutward, DraftAngle)

void InsertRib( 
   bool Is2Sided,
   bool ReverseThicknessDir,
   double Thickness,
   int ReferenceEdgeIndex,
   bool ReverseMaterialDir,
   bool IsDrafted,
   bool DraftOutward,
   double DraftAngle
)

void InsertRib( 
&   bool Is2Sided,
&   bool ReverseThicknessDir,
&   double Thickness,
&   int ReferenceEdgeIndex,
&   bool ReverseMaterialDir,
&   bool IsDrafted,
&   bool DraftOutward,
&   double DraftAngle
)