Available in the LEADTOOLS Imaging toolkit.
Intensity example for Access 2.0
This example lightens the bitmap and repaints the image.
Me![LEAD1].Object.Intensity 150 Me![LEAD1].Object.ForceRepaint