|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块到图形中之用）Public Sub mm()0 v% C. L9 W' o, r+ B
Dim a As AcadExternalReference% O6 L7 W7 P, j8 Z# Y p1 }
Dim b(0 To 2) As Variant3 P# P1 }; a% }
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点
. p& S! p8 b% i, XSet a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”- E1 J9 C9 M: O& W/ f
a.Update ‘显示块
0 @# ?2 y" L& Y6 LZoomAll
( H4 X+ \9 R5 [( f/ Z/ |End Sub |
|
发表于 2014-4-25 22:09:23