cad vba UCS移动问题

来源：百度知道 编辑：UC知道 时间：2024/06/09 12:59:49
本人运用VBA把坐标连线画在CAD上了，但是如果坐标过大就不会直接在屏幕上显示，需要动手移动到那个位置比较麻烦。请问有没有熟悉这方面的人指教一下
“在代码的最后加上
ZoomAll
然后重生成当前视口来保证所有图元重新生成一遍。 ”
我试过了，不行，因为坐标大到需要两次全部重生成才行的地步，我看还是能有个能用VBA的语法来控制UCS的移动命令，移动到指定位置比较好。就是不知道怎么用

在代码的最后加上
ZoomAll
ThisDrawing.Regen acActive Viewport
即首先缩放全部
然后重生成当前视口来保证所有图元重新生成一遍。

双击中键试试看.//