ColorThreshold example for Visual Basic

   Dim RasterProc As New LEADRasterProcess
   Dim i As Integer
   For i = 0 To 2
      RasterProc.ComponentMinRange(i) = 128
      RasterProc.ComponentMaxRange(i) = 255
      RasterProc.ComponentFlags(i) = CLTH_TYP_BANDPASS
   Next i
   'Apply color Threshold effect on the image
   RasterProc.ColorThreshold LEADRasterView1.Raster, CLTH_RGB_SPACE