|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数,急!(添加外部块到图形中之用)Public Sub mm()$ r" T* [. `( U7 t, r( o9 S1 s
Dim a As AcadExternalReference
% l4 u- m( k( m( u- i% Y; s, H+ NDim b(0 To 2) As Variant
/ f& t2 Q+ y" P h( ~b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点
5 ]" n/ c# ~1 _Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”8 W i. N9 W1 r- S, R. z3 @
a.Update ‘显示块
2 G& t* ~+ x6 D3 L0 y1 R- _ZoomAll
* H8 V, ~9 Z3 W' g. P' A% f: eEnd Sub |
|