|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块到图形中之用）Public Sub mm()
1 ]8 }9 @. B1 I0 G4 ]3 lDim a As AcadExternalReference0 l5 D5 o5 e1 `
Dim b(0 To 2) As Variant, a: W2 a7 D/ Z$ R: y
b(0) = 10: b(1) = 10: b(2) = 20 ‘定义块插入基点( V# t2 _& G% U+ E0 p
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False) ’引用G盘下VV文件名里的块“rec”
! F [6 C* S# ]$ ^( S& Ua.Update ‘显示块) F- t! X! }- F- q+ f
ZoomAll
- x# b: z* }) Z* l7 K; bEnd Sub |
|
发表于 2014-4-25 22:09:23