happycwh 发表于 2016-1-26 20:11:09

菜鸟求助:pline命令画出的多义线到底属于哪一个类管

本帖最后由 happycwh 于 2016-1-26 20:16 编辑

先定义了一个acadpolyline变量,用pline命令画了一条多义线,然后在vba程序里用选择集的SelectOnScreen选择这条多义线,然后用选择集的item方法把选择结果赋给这个acadpolyline变量,结果不成功,错误提示为type mismatch。
代码如下:
Sub DrawConcreteBrace()
    Dim line As AcadPolyline
    Dim sset As AcadSelectionSet   
    Set sset = ThisDrawing.SelectionSets.Add("test")
    ThisDrawing.Utility.Prompt vbLf & "请选择多义线:"
    sset.SelectOnScreen
    Set line = sset.Item(0)
    sset.Delete
End Sub

如果把line定义成variant或者AcadEntity,就没有任何问题。定义成acadentity时,用acadentity的ObjectName 属性查出来,pline画出的多义线为 "AcDbPolyline",那么这个"AcDbPolyline"在vba里到底属于哪个类?



雪山飞狐_lzh 发表于 2016-1-26 20:16:14

Lwpolyline

happycwh 发表于 2016-1-26 20:20:45

雪山飞狐_lzh 发表于 2016-1-26 20:16 static/image/common/back.gif
Lwpolyline

谢谢,果然是,那AcadPolyline对应的AcadEntity里的objectname是什么?

zzyong00 发表于 2016-1-27 14:13:49

Polyline
页: [1]
查看完整版本: 菜鸟求助:pline命令画出的多义线到底属于哪一个类管