选择多段线
我在选择多段线时遇到错误（相同的代码适用于3dpolyline、line和arc）Dim Pick As Variant
Dim Polyline As AcadPolyline
ThisDrawing.Utility.GetEntity Polyline, Pick, vbCr & "Select the polyline"
我试图找到问题，但唯一发现的是，在选择多段线时，实体不是AcadPolyline类型。为什么？
如何选择多段线？
Dim Pick As Variant
Dim Polyline As AcadPolyline
ThisDrawing.Utility.GetEntity Ent, Pick, vbCr & "Select the polyline"
If TypeOf Ent Is AcadPolyline Then
Set Polyline = Ent
End If Autodesk对各种多段线实体以及它们在应用程序和API上下文中的引用方式有点混淆。你的情况的底线是：
将LW多段线调整为ACADLW多段线
. . . .
如果Ent的类型为AcadLWPolyline，则
设置LWPolyline=Ent 谢谢你的解决方案。该程序正常工作。
非常感谢你
休伯特
页:
[1]