Public Function New( _
   ByVal radius As Integer, _
   ByVal colorDistance As Integer _
)

Dim radius As Integer
Dim colorDistance As Integer
 
Dim instance As New MeanShiftCommand(radius, colorDistance)

public MeanShiftCommand( 
   int radius,
   int colorDistance
)

public:
MeanShiftCommand( 
   int radius,
   int colorDistance
)

Public Sub MeanShiftCommandExample()
     Dim codecs As New RasterCodecs()
     codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"))

   ' Prepare the command
   Dim command As MeanShiftCommand = New MeanShiftCommand
   'Apply 
   command.Radius = 5
   command.ColorDistance = 10
   command.Run(leadImage)

End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void MeansShiftCommandExample()
     {
         // Load an image
         RasterCodecs codecs = new RasterCodecs();
         codecs.ThrowExceptionsOnInvalidImages = true;

         RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"));

         // Prepare the command
         MeanShiftCommand command = new MeanShiftCommand();
         //Apply 
         command.Radius = 5;
         command.ColorDistance = 10;
         command.Run(image);

     }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}