可以使用栅格作为直观的定位基准,并打开“捕捉”模式以限制光标的移动。除设置间距外,还可以调整捕捉和栅格的对齐方式。也可以旋转对齐方式,或者将其设置为用于等轴测图形。
如果需要沿特定对齐方向或角度绘图,可以旋转捕捉角度。捕捉角度旋转的中心点即是捕捉基点。如果需要对齐填充图案,可以更改此点(通常设置为 0,0)。
要旋转捕捉角度,请使用 SnapRotationAngle 特性。要更改捕捉角度旋转的基点,请使用 SnapBasePoint 特性。
注意这两个特性都需要调用 Update 方法来更新 AutoCAD 显示。
有关使用和设置捕捉和栅格的详细信息,请参见《用户手册》中的“调整栅格和栅格捕捉”。
本例将捕捉基点更改为 (1,1),并将捕捉旋转角更改为 30 度,同时打开栅格以显示这些更改。
Sub Ch3_ChangeSnapBasePoint()
' 打开活动视口的栅格
ThisDrawing.ActiveViewport.GridOn = True
' 将捕捉基点更改为 1, 1
Dim newBasePoint(0 To 1) As Double
newBasePoint(0) = 1: newBasePoint(1) = 1
ThisDrawing.ActiveViewport.SnapBasePoint = newBasePoint
' 将捕捉旋转角更改为 30 度(0.575 弧度)
Dim rotationAngle As Double
rotationAngle = 0.575
ThisDrawing.ActiveViewport.SnapRotationAngle = rotationAngle
' 重置视口
ThisDrawing.ActiveViewport = ThisDrawing.ActiveViewport
End Sub