PaintScaling example for Visual Basic

' This example sets the display to use bilinear interpolation
LEAD1.PaintScaling = PAINTSCALING_RESAMPLE