Zeusovsky 发表于 2022-7-6 15:23:57

我如何获得或操纵th

我怎样才能得到图纸上的红色圆圈。我想在其他绘图中绘制红色圆圈,但根据他的属性,这些圆圈在BlockReferece中。我尝试了一些代码,但什么都没有得到。圆圈不出现在模型空间或选择集中,当我使用选择集时,我将SSetColl放入手表中,但显示为空。如果有人有代码可以帮我解决这个问题,我非常感谢你的帮助
 
我只想要红色的圆圈,用于在其他绘图中重新绘制我需要的对象,因为我需要更改其中一些的半径。
 
例子:
将块变暗为AcadBlock
对于本图中的每个块。阻碍
'...获取圆的一些代码
下一个
 

 
Dim SSetColl作为AcadSelectionSets
SSetColl=此图纸。选择集
对于SSetColl中的每个块
'...获取圆的一些代码
下一个
 

 
Dim SSetColl作为AcadSelectionSet
SSetColl=此图纸。PickfirstSelectionSet
对于SSetColl中的每个块
'...获取圆的一些代码
下一个

Zeusovsky 发表于 2022-7-6 16:37:12

我怎样才能得到图纸上的红色圆圈。我想在其他绘图中绘制红色圆圈,但根据他的属性,这些圆圈在BlockReferece中。我尝试了一些代码,但什么都没有得到。圆圈不出现在模型空间或选择集中,当我使用选择集时,我将SSetColl放入手表中,但显示为空。如果有人有代码可以帮我解决这个问题,我非常感谢你的帮助
 
我只想要红色的圆圈,用于在其他绘图中重新绘制我需要的对象,因为我需要更改其中一些的半径。
 
例子:
将块变暗为AcadBlock
对于本图中的每个块。阻碍
'...获取圆的一些代码
下一个
 

 
Dim SSetColl作为AcadSelectionSets
SSetColl=此图纸。选择集
对于SSetColl中的每个块
'...获取圆的一些代码
下一个
 

 
Dim SSetColl作为AcadSelectionSet
SSetColl=此图纸。PickfirstSelectionSet
对于SSetColl中的每个块
'...获取圆的一些代码
下一个
测试。图纸
页: [1]
查看完整版本: 我如何获得或操纵th