Public Function AddByPlaneGeometry( _
   ByVal OriginX As Double, _
   ByVal OriginY As Double, _
   ByVal OriginZ As Double, _
   ByVal NormalX As Double, _
   ByVal NormalY As Double, _
   ByVal NormalZ As Double, _
   ByVal UDirX As Double, _
   ByVal UDirY As Double, _
   ByVal UDirZ As Double _
) As Sketch