请教vla-addcircle语句

zxy9108

(setq cir (vla-addcircle *modelspace*         (vlax-3d-point pt) 2.6))


上面这句中，pt是用getpoint语句得到的点；运行时错误，由于小弟才疏学浅，不知错在哪里，向各位兄弟请教。(*modelspace*已定义过）

BDYCAD

(setq *modelspace* ( vla-get-modelspace(vla-get-activedocument (vlax-get-acad-object))))
(setq cir (vla-addcircle *modelspace* (vlax-3d-point (getpoint)) 2.6)) 这样再试.

zxy9108

试过了,还是不行,一样的错误,可能错误很隐蔽

ljpnb

好象不可能吧，2楼的这两句正常执行，问题会不会出在其它地方啊。。。。

zxy9108

谢谢大家，我的问题是*modelspace* 定义错了，用了vla-get-activespace