对于此图形中的每个ObjFind,将ObjFind设置为AcadObject<br>将ObjFind设置为AcardBlockReference<br>并将其设置为整数<br>。Modelspace
如果ObjFind的类型是AcadBlockReference,则
如果BRFind,则设置BRFind=ObjFind
。Name=“[Insert Name of block from AutoCAD here]”然后
BRCount=BRCount+1
如果
结束如果
,下一个
应该工作,实例数存储在BRCount中。