- 相对于图形界限
- 相对于当前视图
- 相对于图纸空间单位
要缩放视图,请使用 ZoomScaled 方法。该方法需要两个输入参数:缩放比例和缩放类型。缩放比例是一个数值,AutoCAD 对该数值的解释取决于用户选择的缩放类型。
缩放类型确定缩放值是相对于图形界限、当前视图还是相对于图纸空间单位创建的。相对于图形界限缩放时,使用常量 acZoomScaledAbsolute;相对于当前视图缩放时,使用常量 acZoomScaledRelative;相对于图纸空间单位缩放时,使用常量 acZoomScaledRelativePSpace。
Sub Ch3_ZoomScaled()
MsgBox "Perform a ZoomScaled using:" & vbCrLf & _
"Scale Type: acZoomScaledRelative" & vbCrLf & _
"Scale Factor: 2", , "ZoomScaled"
Dim scalefactor As Double
Dim scaletype As Integer
scalefactor = 2
scaletype = acZoomScaledRelative
ThisDrawing.Application.ZoomScaled scalefactor, scaletype
End Sub