社区 › Auto Lisp › vb。net如何闭合多段线

shirazbj 发表于 2022-7-6 22:40:43

vb。net如何闭合多段线

你好
 
我要计算闭合多段线的面积。我选取一条多段线，如果它没有闭合，我想闭合它。但是下面的代码不起作用。
 
                            If lwpoly.Closed = False Then
                               lwpoly.Closed = True
                           End If

 
它返回一个内部错误，称为“eNotOpenForWrite”。我只是想知道如何用vb闭合多段线。net 2008 express for autocad 2010。
 
提前感谢
 
海洋

Jeff H 发表于 2022-7-6 23:39:00

看起来你打开了，所以试试看
 

         If lwpoly.Closed = False Then
               lwpoly.UpgradeOpen()
               lwpoly.Closed = True
         End If

shirazbj 发表于 2022-7-6 23:43:15

谢谢杰夫，它很管用。
 
我在玩theswamp的代码-。net多段线例程
它有一行是这样的：
 
Dim obj As DBObject=tr.GetObject（res.ObjectId，OpenMode.ForRead）
 
我想我应该在这里换衣服。
 
 

查看完整版本: vb。net如何闭合多段线