|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块到图形中之用）Public Sub mm()
% V8 s7 E/ E: ?, {. ~$ \) cDim a As AcadExternalReference# M; U2 H( }) p1 h$ J. q: n
Dim b(0 To 2) As Variant; t/ `0 ]0 A" i2 }# z+ c
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点1 v1 g' p" e0 k; k0 T3 T
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
7 v1 m. I: V2 _' ya.Update ‘显示块
( v [: [+ g# ?0 U% yZoomAll6 {8 v4 g4 c! p2 S
End Sub |
|
发表于 2014-4-25 22:09:23