CAD中VBA程序如何避免使分散的线段变成封闭的图形

CAD中VBA程序如何处理使分散的线段变成封闭的图形
CAD中VBA程序如何处理使分散的线段变成封闭的图形？比如原图是用N条直线围成的一个多边形，现在要把它处理成一个封闭的图形，而不是一段段的。
------解决方案--------------------------------------------------------
你的线段是首尾相连的么?你确定出来是个圆形么？

http://www.vbaexpress.com/kb/getarticle.php?kb_id=111

这个是把线段连成polyline的代码