社区 › VB › 来自xref的属性

cadpro 发表于 2006-11-7 06:30:35

来自xref的属性

大家好，
是否可以使用对象DBX从xref中检索属性值？
谢谢
**** Hidden Message *****

cadpro 发表于 2006-11-7 06:56:20

对

Bryco 发表于 2006-11-7 07:44:57

你能帮我解决这个问题吗？谢谢

cadpro 发表于 2006-11-7 10:06:39

没有可用的选择集，因此您必须循环遍历模型或文件空间。
那么您是想从每个块中获取每个att还是？？。
让我们缩小一点范围。

cadpro 发表于 2006-11-8 00:57:08

谢谢你的回复，布莱科
我专门搜索每个布局，因为每个布局都包含一些具有几个属性的blockreference。我打算做的是，我将这些属性写入Excel，一行一布局。到目前为止，一切正常。但其中一个属性位于外部参照中，无法像所有其他属性一样检索。因此，我想知道如何做到这一点。
谢谢

Bryco 发表于 2006-11-8 02:54:18

这是我的代码：
For intLayout = objDBX.Layouts.Count - 1 To 0 Step -1
   If objDBX.Layouts(intLayout).ModelType = False Then
      For Each objEnt In objDBX.Layouts(intLayout).Block
         If TypeOf objEnt Is AcadExternalReference Then
            For Each Entity In objDBX.Layouts(intLayout).Block(objEnt.Name)
               If Entity.HasAttributes Then
                  'do operation here
               End If
         Next Entity
         End If
      Next objEnt
   End If
Next intLayout
谢谢

cadpro 发表于 2006-11-8 05:15:18

我不倾向于这样做

Kerry 发表于 2006-11-8 23:57:31

因为。XRefDatabase不适用于dbx，您最好使用另一个dbx实例打开外部参照并获取所需的内容

cadpro 发表于 2006-11-11 00:41:24

谢谢你，布瑞克。奏效了。但是执行代码需要一段时间。有没有某种执行速度更快的代码？谢谢

cadpro 发表于 2006-11-11 01:06:53

有效的是。。比什么快

查看完整版本: 来自xref的属性