请教版主??

笑傲江湖

你好,我在图中插入一个外部参照(一个带有属性的图块),再对插入的这个图块进行ate属性加工,为什么他说块不具有可编辑属性?麻烦版主解答一下
Sub lzx()
Dim insertpoint As Variant
Dim externalblock As AcadExternalReference
Dim tempblock As AcadBlock
Dim filename As String
insertpoint = ThisDrawing.Utility.GetPoint(, "请指定第一个点")
filename = "e:\新块.dwg"
Set externalblock = ThisDrawing.ModelSpace.AttachExternalReference(filename, "aaa", insertpoint, 1, 1, 1, 0, False)

End Sub

mccad

illuminiti

mccad 发表于 2002-9-23 13:05

这个函数该怎么用？我试了例子中的代码怎么不行啊？该注意什么
望指点  谢谢