Centers the map at the location of the specified point object.
object.CenterAt ( pPoint ) |
- pPoint
- Required. A variable declared as a Point object.
CenterAt Example
CenterAt Example (VBScript) | Copy Code |
---|---|
Sub CenterMap Dim objPoint Set objPoint = Application.CreateAppObject("point") objPoint.X = Application.Map.PointerX objPoint.Y = Application.Map.PointerY Application.Map.CenterAt(objPoint) Set objPoint = Nothing End Sub Sub CenterMapXY Dim lngPointerX, lngPointerY lngPointerX = Application.Map.PointerX lngPointerY = Application.Map.PointerY Call Application.Map.CenterAtXY(lngPointerX,lngPointerY) End Sub |