EnableZoomInRect example for Visual Basic

This example toggles the EnableZoomInRect property.

'Toggle the ZoomInRect setting
           If Lead1.EnableZoomInRect = True Then
               Lead1.EnableZoomInRect = False
           Else
               Lead1.EnableZoomInRect = True
           End If