换个角度问一下
我问了：“如何提取剖面线？？”
“如何让一个对象处于选中状态？？”
第二个问题其实是第一个问题的延伸
斑竹说把剖面线分解后读取
因为剖面线没有explode这个方法
所以斑竹说用SendCommand
但这又有个问题：需要用户来选中剖面线！！
因为我要处理大量的剖面线
所以让用户来选择，是不可行的
于是我想先选中剖面线，再SendCommand
于是问题就变为：如何让一个对象处于选中状态？？”
斑竹，如果不能分解读取剖面线，那又能怎么办呢
难道要我自己添加剖面线？？？？
郁闷ing……
可以用以下方法来解决
'转换图元函数Public Function axEnt2lspEnt(entObj As AcadEntity) As String
Dim entHandle As String
entHandle = entObj.Handle
axEnt2lspEnt = "(handent " & Chr(34) & entHandle & Chr(34) & ")"
End Function
这样就可以将AX中的对象通过以上函数转换为可以直接用于SendCommand方法的对象了。
示例文章可见二次开发栏目
http://www.mjtd.com/a2/list.asp?id=30完全可行！！！！！感谢斑竹！！！！！！！！！
页:
[1]