VB.net总又一些Bug,前段时间发现不能对同一实体附多次扩展数据
如:
Sub test()
Dim a As AcadObject
ThisDrawing.Utility.GetEntity a, pnt
Dim datatype(1) As Integer, data(1) As Variant
datatype(0) = 1001: data(0) = "Test"
datatype(1) = 1000: data(1) = "This is a Test1"
a.SetXData datatype, data
data(1) = "This is a Test2"
a.SetXData datatype, data
End Sub
VBA里可以,VB.net却不行,晕,害我忙了半天