SelectionSet

A group of one or more AutoCAD objects specified for processing as a single unit.

---

Add

Creates a member object and adds it to the appropriate collection.

Dim ssetObj As AcadSelectionSetSet ssetObj = ThisDrawing.SelectionSets.Add("ssetName")

SelectOnScreen

Prompts the user to pick an object from the screen.

ssetObj.selectOnScreen 

Select

Prompts the user to pick an object from the screen.

Dim mode As Integermode = acSelectionSetAll     'acSelectionSetWindow    'acSelectionSetCrossing    'acSelectionSetPrevious    'acSelectionSetLast    'acSelectionSetAll ssetObj.Select mode, , , , 

filter
另一章叙述

Dim filtertype(1) As IntegerDim filterdata(1) As Variantfiltertype(0) = 0:filterdata(0) = "Circle" filtertype(1) = 8:filterdata(1) = "0" ssetObj.selectOnScreen filtertype, filterdata'ssetObj.Select mode, , , filtertype, filterdata

Clear / Erase / Delete

'ssetObj.Clear  'count=0, Name=ssetName'ssetObj.Erase  'count=0, Name=ssetName                'Delete all members off the model space'ssetObj.Delete 'null

Clear：清空选择集。选择集将仍然存在。Erase：清空选择集。选择集将仍然存在。图形空间中删除图元。Delete：删除选择集。RemoveItems：从选择集中删除一个或多个项目。 删除的项目仍然存在，但是它们不再驻留在选择集中。

---

上一篇
下一篇