Function E(basePoint As Variant, PointArr As Variant) As Ex
Dim MainArr() As AcadEntity
Dim Boolean2Arr() As AcadEntity
With Ex
.Main = MainArr
.Boolean2 = Boolean2Arr
End With
End Function
Ex的Type .. end type定义如下,程序都不通过Type Ex
Main() As AcadEntity
Boolean2() As AcadEntity
End Type
或
Type Ex
Main As Variant
Boolean2 As Variant
End Type问题提出
Dim MainArr() As AcadEntity
Dim Boolean2Arr() As AcadEntity
是AutoCAD实体数组的定义,在function 通过,
将function e() As AcadEntity()也通过.但是我要返回两个CAD图元数据数组.
请问,各位大侠的问题是type end type只能定义其通用的数据类型,而不能定义第三方插件的数据类型吗?
Dim MainArr() As AcadEntity
Dim Boolean2Arr() As AcadEntity
With Ex
.Main = MainArr
.Boolean2 = Boolean2Arr
End With
End Function
Ex的Type .. end type定义如下,程序都不通过Type Ex
Main() As AcadEntity
Boolean2() As AcadEntity
End Type
或
Type Ex
Main As Variant
Boolean2 As Variant
End Type问题提出
Dim MainArr() As AcadEntity
Dim Boolean2Arr() As AcadEntity
是AutoCAD实体数组的定义,在function 通过,
将function e() As AcadEntity()也通过.但是我要返回两个CAD图元数据数组.
请问,各位大侠的问题是type end type只能定义其通用的数据类型,而不能定义第三方插件的数据类型吗?
AcadEntity 数据类型要定义!!