TransparentColor example for Visual Basic

Note: Also works with Access 95 and 97.

This example sets white as a transparent color; then loads a test image and paints it.

Lead1.AutoRepaint = False

'Enable transparency
Lead1.BitmapEnableTransparency = True 

'Make white the transparent color
Lead1.BitmapTransparentColor = RGB(255, 255, 255)
Lead1.Load "d:\temp\ctest.bmp", 0, 0, 1
Lead1.ForceRepaint