ActiveX and VBA Developer's Guide > Control the AutoCAD Environment > Control the Drawing Windows > Use Zoom > 
Center Objects
 
 
 

Zoom in on the active drawing to a specified center You can move a specific point in your drawing to the center of the graphics area. The ZoomCenter method is useful for resizing an object and bringing it to the center of the viewport. With ZoomCenter, you can specify a scale size by entering a magnification relative to the current view.

Zoom in on the active drawing to a specified center

The following example shows the effects of using ZoomCenter to display a view at the same size and at twice the size:

Sub Ch3_ZoomCenter()

	MsgBox "Perform a ZoomCenter using:" & vbCrLf & _

		 "Center 3, 3, 0" & vbCrLf & _

		 "Magnification: 10", , "ZoomCenter"




	Dim Center(0 To 2) As Double




	Dim magnification As Double







	Center(0) = 3: Center(1) = 3: Center(2) = 0




	magnification = 10







	ThisDrawing.Application.ZoomCenter Center, magnification




End Sub













500 Internal Server Error


Internal Server Error


The server encountered an internal error or
misconfiguration and was unable to complete
your request.


Please contact the server administrator at 
 webmaster@entercad.forsenergy.ru to inform them of the time this error occurred,
 and the actions you performed just before this error.


More information about this error may be available
in the server error log.


Additionally, a 500 Internal Server Error
error was encountered while trying to use an ErrorDocument to handle the request.