|
请问各位高手acadblock 与acadblockreference有什么区别
我的程序中有一段如下代码,在平时没有错误。 但是在当我在模型中插入一个图形块以后,再次运行就出现了错误13,类型不匹配。错误语句是For Each objBlkRef In ThisDrawing.ModelSpace。 请各位帮帮忙,看看是什么问题。
Dim objBlkRef As AcadBlockReference
For Each objBlkRef In ThisDrawing.ModelSpace
If StrComp(objBlkRef.Name, "标题栏") = 0 Then
createMode = False
Exit For
End If
Next objBlkRef
|
|