[求助]AUTO CAD VBA编程的问题

ygswh

请各位高手指点一下，如何将已经存在的、当前的用户坐标系对象赋予acaducs对象变量？

雪山飞狐_lzh

指定图形中活动的 UCS 。

参阅 | 示例

语法

object.ActiveUCS

object

Document
使用该属性的对象。

ActiveUCS

UCS 对象
图形中活动的 UCS 。

说明

对当前活动 UCS 的更改只有在该 UCS 重新设置为活动 UCS 时才能看到更改后的情况。

如果试图在当前 UCS 未保存时获取活动的 UCS 值，将会出错。建议在获取活动 UCS 值前确认 UCSNAME 系统变量值为非空。或者，也可以在获取活动 UCS 值之前添加一个新的 UCS 对象并将其设为活动。