Available in the LEADTOOLS Imaging toolkit.
IntensityDetect example for Visual Basic
This example filters the bitmap to get the lightest intensities and repaints the image.
Lead1.IntensityDetect 200, 255 Lead1.ForceRepaint