|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数,急!(添加外部块到图形中之用)Public Sub mm()+ g' h) f% j2 [- a" t: D9 m1 a7 g
Dim a As AcadExternalReference
! l- K8 ~* w& `Dim b(0 To 2) As Variant
" N1 ]0 o* h1 {9 v0 Z. v3 N# cb(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点0 D6 |! F3 S+ \0 e3 U! q
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”4 \- `) F$ I" D
a.Update ‘显示块1 s, F5 a( L* h4 D( P
ZoomAll
( l6 q; h _2 u8 v6 }End Sub |
|