alway489 发表于 2006-4-11 17:27:00

紧急求助

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

mccad 发表于 2006-4-11 17:46:00

你能保证你的模型空间中只有一个图块吗？
页: [1]
查看完整版本: 紧急求助