Question

请问各位大神为什么这个CAD的VBA程序运行到第五句的时候就显示无效的过程调用或参数，急！(添加外部块）

Public Sub mm()
Dim a As AcadExternalReference
Dim b(0 To 2) As Variant
b(0) = 10: b(1) = 10: b(2) = 20
Set a = ThisDrawing.ModelSpace.AttachExternalReference("G:\vv.dwg", "rec", b, 1, 1, 1, 0, False)
a.Update
ZoomAll
End Sub

Answer 1

Dim b(0 To 2) As Variant 数据类型定义错误
改为Dim b(0 To 2) As Double

Answer 2

b明显是个数组，，调用时格式应该是 b(下标) ，直接用b 调用肯定错误!