在vba中插入块时分解

krampaul82 · 发表于 2007-8-28 12:57:26

对于可能涉及的人，我是VBA新手，请友善….我正在通过VBA程序（见附件）将ACAD块加载到图形中。然后我想爆炸那个加载的块&nbsp；我在vba中找到了一些名为“发送到命令行”（见附件）的脚本代码，但它不起作用，它将类似条形码的内容发送到命令行里&nbsp；Maby I&#039；我这样做很复杂，应该让用户分解块？如有任何建议，将不胜感激&nbsp；非常感谢cmdrduh之前对combobox的帮助！！你的建议很好。

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

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

krampaul82 · 发表于 2007-8-28 15:17:38

从您的代码

copy

Dim blockRefObj As AcadBlockReference
    Set blockRefObj = ThisDrawing.ModelSpace.InsertBlock(returnPnt, "C:\Acad_2008\2008_Blocks\Controllers\nxs0015a1007-01.dwg", 1#, 1#, 1#, 0)

blockRefObj。爆炸