|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数,急!(添加外部块到图形中之用)Public Sub mm()
3 V9 h3 m* S3 E& SDim a As AcadExternalReference
& l2 S% l" {; B1 { ], hDim b(0 To 2) As Variant: }. g* p2 }7 V4 H
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点
7 f/ I! t4 E! f- FSet a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”7 R6 ~, O" d- r( y( e, N5 F; S
a.Update ‘显示块0 _# ^4 i% c7 Y6 |8 f) q, o
ZoomAll% h/ w5 M/ B2 y8 H. V
End Sub |
|