Posterize example for Visual Basic

Note: Also works with Access 95 and 97.

This example applies a six-color poster effect and redisplays the image.

Lead1.Posterize 6
Lead1.ForceRepaint