Zoom to the specified percent focusing on given point | |
Syntax: | object.ZoomToPoint x, y, percentZoom |
Parameters: |
x As
long -
y As
long -
percentZoom
As long -
|
Description: | Zooms to the specified percent focusing on the
given point Examples Sub GefScreen_ZoomToPoint() Dim oCimScr As GefScreen Set oCimScr = CimGetScreen oCimStr.ZoomToPoint
10,10,75 End Sub |