|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数,急!(添加外部块到图形中之用)Public Sub mm()
" q) |, d$ f) z; P& DDim a As AcadExternalReference
5 h9 F' g' l( B* X% cDim b(0 To 2) As Variant
" _; d& A; S/ k) d" Kb(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点1 v5 `0 c; o1 H9 I0 B( u3 J N
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
Z9 r/ P. ~6 F/ Y3 J( H8 [a.Update ‘显示块
, M7 b& {3 H. |) E$ T& NZoomAll# c; r4 W9 T% [( I: }
End Sub |
|