Sharpen example for Visual Basic

Note: Also works with Access 95 and 97.

This example increases the sharpness of the bitmap and redisplays the image.

Lead1.Sharpen 100
Lead1.ForceRepaint