Function IMultiSelectByRay( _
   ByRef PointIn As Double, _
   ByRef VectorIn As Double, _
   ByVal RadiusIn As Double, _
   ByVal TypeWanted As Integer, _
   ByVal Append As Boolean _
) As Boolean

Dim instance As IModelDoc
Dim PointIn As Double
Dim VectorIn As Double
Dim RadiusIn As Double
Dim TypeWanted As Integer
Dim Append As Boolean
Dim value As Boolean
 
value = instance.IMultiSelectByRay(PointIn, VectorIn, RadiusIn, TypeWanted, Append)

bool IMultiSelectByRay( 
   ref double PointIn,
   ref double VectorIn,
   double RadiusIn,
   int TypeWanted,
   bool Append
)

bool IMultiSelectByRay( 
&   double% PointIn,
&   double% VectorIn,
&   double RadiusIn,
&   int TypeWanted,
&   bool Append
)