[求助]：[0806]如何解决线段角度错误问题?

xyz518mm

[求助]：[0806]如何解决线段角度错误问题?
小弟想将图面上的线段角度,
变更为只有0到179....度,
180视为 0 度,
虽然已经可以使用
但却发生一个问题,
就是回传的角度值,
为何会变成高精度的值呢?
如 180 度回传竟成为 2.17291e-013
这样跟系统中的性质查询的角度值不同阿
该怎样处理呢?
烦请各位高手可以帮忙一下~
谢谢~

2. 
   
3. (defun ch-sp-ep (ename / vla_obj obj vla_obj_sp vla_obj_ep angobj)
   
4. (setq vla_obj (la-to-vla ename))
   
5. (setq obj (vla-get-angle vla_obj))
   
6. (cond
   
7. ((>= obj pi)
   
8. (progn
   
9. (setq vla_obj_sp (vlax-get vla_obj 'startpoint))
   
10. (setq vla_obj_ep (vlax-get vla_obj 'endpoint))
    
11. (vla-put-startpoint vla_obj (vlax-3d-point vla_obj_ep))
    
12. (vla-put-endpoint vla_obj (vlax-3d-point vla_obj_sp))
    
13. ))
    
14. (T nil)
    
15. )
    
16. (setq angobj (vla-get-angle vla_obj))
    
17. angobj
    
18. )
    

<br /> (defun ch-sp-ep (ename / vla_obj obj vla_obj_sp vla_obj_ep angobj)<br /> (setq vla_obj (la-to-vla ename))<br /> (setq obj (vla-get-angle vla_obj))<br /> (cond<br /> ((>= obj pi)<br /> (progn<br /> (setq vla_obj_sp (vlax-get vla_obj 'startpoint))<br /> (setq vla_obj_ep (vlax-get vla_obj 'endpoint))<br /> (vla-put-startpoint vla_obj (vlax-3d-point vla_obj_ep))<br /> (vla-put-endpoint vla_obj (vlax-3d-point vla_obj_sp))<br /> ))<br /> (T nil)<br /> )<br /> (setq angobj (vla-get-angle vla_obj))<br /> angobj<br /> )<br />

刚刚换了图档用看看

却发现没问题了

这是怎么回是呢

是cad系统问题吗? 真不懂之前为何会回传 2.17291e-013 的角度值