两个简单问题请教？

gentellu

1.如何在通过VBA建立的UCS中按该UCS坐标绘图？


2.如何判断一个对象变量是否包含对象？

雪山飞狐_lzh

1、帮助里的实例：


[WEB]http://www.vba.cn/object/acad2004/ex_activeucs.htm[/WEB]


2、什么意思？

gentellu

版主上述方法只是将用户坐标系设置为当前坐标系，但在该坐标系中通过VBA输入坐标绘图与在WCS中无区别，最主要的是在该坐标系中返回实体的坐标并不是按该坐标系所定的坐标                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         


                                         第2个问题说具体点就是建立一个返回实体对象的函数，引用该函数时如何判断是否已返回实体对象。

tfyyf

dispbbs.asp?boardID=32&ID=25126&page=1

雪山飞狐_lzh

[WEB]http://www.vba.cn/object/acad2004/idh_translatecoordinates.htm[/WEB]


第2个问题:


if not (obj is nothing) then


end if

gentellu

多谢版主！TranslateCoordinates方法是可以解决上述问题，但该方法只能逐点转换，如果一个实体包含很多的坐标点时该方法显得很笨拙。


我试过object.TransformBy方法但也无法完成所需要的转换功能。请教各位高手有没有更好的办法。谢谢！