|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数,急!(添加外部块到图形中之用)Public Sub mm()
" a) d+ P8 j0 N4 E: GDim a As AcadExternalReference
4 ~; d7 R3 f- f0 P, B* cDim b(0 To 2) As Variant6 M1 P. r# X/ `2 Q! o
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点2 a! \/ n% R* w; m J! m
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
6 X0 u0 n7 z6 xa.Update ‘显示块
1 D. o/ _: a9 r" q- X' BZoomAll0 {% N* }. v1 \9 S3 Q, E g% F. S
End Sub |
|