GefScreen.ZoomToRectangle (method)

Zoom to the specified rectangle
Syntax: object.ZoomToRectangle top, left, bottom, right
Parameters:
top As long -
left As long -
bottom As long -
right As long -
Description: Zooms to the rectangle specified by the given points

Examples

Sub GefScreen_ZoomToRectangle()
    
    Dim oCimScr As GefScreen
    Set oCimScr = CimGetScreen
    oCimStr.ZoomToRectangle 10,10,50,50
    
End Sub