VBA等同于突发？

Matersammichman · 发表于 2006-12-13 13:08:32

我的突发命令每天至少会发出一次:丑陋:
有人知道VBA的对等物吗？

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

Matersammichman · 发表于 2006-12-13 14:56:20

据我所知不是这样，但编码起来并不难

iliekater · 发表于 2006-12-13 15:23:48

我不介意做腿部工作，但你能给我一两条线索吗？

Arizona · 发表于 2006-12-13 15:30:57

BURST命令做什么？

Matersammichman · 发表于 2006-12-13 15:32:00

好了，这里是一些零碎的东西，我希望这足以让你开始...(抱歉，在我不得不离开之前，我还有大约两分钟的时间)
选择您的街区

copy

   If objOldBlk.HasAttributes Then
              varOldAtt = objOldBlk.GetAttributes     'get block attributes
            End If

获取您的属性、插入点、文本字符串等...
添加文本并反馈以上所有值。

Matersammichman · 发表于 2006-12-13 16:05:31

突发将在不丢失属性值的情况下爆炸。因此，在AZ启动时，您需要获取块，过滤属性，创建等于att值的文本，确保使用正确的层，等等。然后分解块，并擦除/删除选择集中的所有attdef。简而言之，这就是需要发生的事情。我有一些att过滤器代码和一个用于处理att的迭代器，因此您真正需要的是文本插入（简单）和ATTDEF的删除（我不知道怎么做。困难的部分是将它们保留在选择集中）