StopMagGlass example for Visual Basic

LEADRASTERVIEW1.ScaleMode = 3

    ' Set MagGlass flags
    ' In this case the masked colors from the Magnifying Glass area will be all the colors
    ' except those colors which will be set using the MagGlassMask property
    LEADRASTERVIEW1.MagGlassFlags = MAGGLASS_MASK_INVERT

    'set the color mask to mask out all colors except a few shades of black
    LEADRASTERVIEW1.MagGlassMaskCount = 3
    LEADRASTERVIEW1.MagGlassMask(0) = RGB(0, 0, 0)
    LEADRASTERVIEW1.MagGlassMask(1) = RGB(1, 1, 1)
    LEADRASTERVIEW1.MagGlassMask(2) = RGB(2, 2, 2)
    LEADRASTERVIEW1.RgnFrameType = 0
    LEADRASTERVIEW1.StartMagGlass 100, 100, 400, RGB(255, 0, 0), RGB(128, 128, 128), True, 1, False, CROSSHAIR_FINE, True, True
   '.......some other work..............
   '.......some other work..............
    'Stop the MagGlass
    LEADRASTERVIEW1.StopMagGlass