IntensityDetect example for Visual Basic

Note: Also works with Access 95 and 97.

This example filters the bitmap to get the lightest intensities and repaints the image.

Lead1.IntensityDetect 200, 255
Lead1.ForceRepaint