|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块到图形中之用）Public Sub mm(); T9 p7 x# I3 B
Dim a As AcadExternalReference
: t# |6 {9 s3 ?0 [% J/ ADim b(0 To 2) As Variant2 t6 N6 P# [+ D
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点
: m& R ~) N4 M0 j6 @# u6 HSet a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
. n- } f" T3 T1 o1 y9 Z' g( Ea.Update ‘显示块; V8 G- n$ p3 a0 k# z: a! _
ZoomAll
9 j2 u1 K8 {1 M" I3 p% R( t! g3 S5 }0 _End Sub |
|
发表于 2014-4-25 22:09:23