gosan 发表于 2004-3-13 09:04:00

'如何实现图纸空间的视图与模型空间的视图一致

'如何实现图纸空间的视图与模型空间的视图一致，请高手赐教，帮我检查下面程序的错误<BR>Sub k1()<BR>Dim v1 As Variant<BR>ThisDrawing.ActiveSpace = acModelSpace<BR>v1 = ThisDrawing.ActiveViewport.Direction 'Direction 是视口的观察方向<BR>ThisDrawing.ActiveSpace = acPaperSpace<BR>ThisDrawing.MSpace = True<BR>ThisDrawing.ActivePViewport.Direction = v1<BR>End Sub

mccad 发表于 2004-3-13 19:17:00

在<BR>ThisDrawing.ActiveSpace = acModelSpace<BR>前加上一句<BR>ThisDrawing.ActiveSpace = acPaperSpace<BR>


呵呵，道理也搞不清

gosan 发表于 2004-3-16 17:34:00

谢谢

谢谢,要的就是这种结果
页: [1]
查看完整版本: '如何实现图纸空间的视图与模型空间的视图一致