HasMagGlass example for Visual Basic

    If (LEADRasterView1.HasMagGlass) Then
        Caption = "Stop"
        'Stop the MagGlass
        LEADRasterView1.StopMagGlass
    Else
        Caption = "Error"
    End If