cqy 发表于 2007-10-31 14:12:00

求助:如何按顺序指定选择集内的元素?

求助:如何按顺序指定选择集内的元素?
Dim objText As AcadText
While n > 0
Set objText = ObjSelectionSet.Item(n - 1)
n = n - 1
    Wend

End Sub
要指定n=1,n=2的字
页: [1]
查看完整版本: 求助:如何按顺序指定选择集内的元素?