Save example for Visual Basic

This example saves the image as a PNG file, loads the new file, and redisplays the bitmap.

Screen.MousePointer = 11 'Hourglass
Lead1.Save "c:\lead\images\tmp.png", FILE_PNG, 8, 1, SAVE_OVERWRITE
Lead1.Load "c:\lead\images\tmp.png", 0, 0, 1
Lead1.ForceRepaint
Screen.MousePointer = 0 ' default