PaintDither example for Visual Basic

This example turns on error diffusion and redisplays the bitmap.

Lead1.PaintDither = PAINTDITHER_DIFFUSION
Lead1.ForceRepaint