请帮我查找一下使用vla的不稳定错误

katamoto

请先看以下代码：
(command "region" en "")
(setq lasten (entlast) lastvl  (vlax-ename->vla-object lasten)      cenvl (vla-get-Centroid lastvl))
(setq cen (vlax-safearray->list (vlax-variant-value cenvl)) cen_x (car cen) cen_y (cadr cen))


现在的问题是，这段代码我先是把封闭多边形en变为面域，然后转为vla对象，求得形心（质心），最后分别求得形心的x和y坐标，现在的问题是，这个程序大部分情况下正常运行，结果ok，但是也会有时候出错，出错的结果是x和y坐标都会翻了一倍，比如，正常cen_x和cen_y为100和75，出错后的坐标为200，150，这个是为什么，有人碰到过吗？

鱼与熊掌

.为什么不用黄明儒的通用函数

katamoto

我还真的不知道有通用函数，就是直接在网上找的先变面域，再直接获取形心，

机械工程师

代码都没贴全啊。