[VBA]块为何无法打碎？

WWWDONG

Dim myblock As AcadBlockReference
    Set myblock = ThisDrawing.ModelSpace.InsertBlock(cenpoint, blockname, zj, zj, 1, 0)
    Dim expobj As Variant
    expobj = myblock.Explode
以上代码为何出错呢？

mccad

对于X、Y、Z轴的插入比例不同的图块，是不能通过程序来打碎的。所以你试试将Z比例的“1”值改为“zj".

czbming

强.又学到新知识了!~