|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块到图形中之用）Public Sub mm()* m J- W5 b* {
Dim a As AcadExternalReference
: o, X& T! [ fDim b(0 To 2) As Variant4 z, v8 ~! Y5 P- k# t8 o' Q
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点! a1 W& {: L# a/ j1 x
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
4 C$ Q# G9 W, {a.Update ‘显示块, ?6 z0 u4 b* `! z! [; H, J6 K' U
ZoomAll: Y0 k r7 i% ?+ { r% _
End Sub |
|
发表于 2014-4-25 22:09:23