activelayer in NET

[Anonymous]

im coding a dll in VB.NET, working as a COM dll (it must run on various versions of ACAD, so i cant use managed code)

there is code that runs in my VB6 dll, but not in this VB.NET COM dll
it fails on ThisDrawing.ActiveLayer = CapaActual

anybody knows why?

Imports Autodesk.AutoCAD.Interop
Imports Autodesk.AutoCAD.Interop.Common
.....
xAcad = GetObject(, "AutoCAD.Application.16")
ThisDrawing = xAcad.ActiveDocument
.....
Dim sLayer As String
Dim CapaActual As AcadLayer
Dim CapaUsuario As AcadLayer

CapaUsuario = ThisDrawing.ActiveLayer
sLayer = ThisDrawing.ActiveLayer.Name
MsgBox(sLayer)
CapaActual = ThisDrawing.Layers.Add("0-IS-Indice")
ThisDrawing.ActiveLayer = CapaActual '<<<<
...

it also happen with

ThisDrawing.ActiveTextStyle = ThisDrawing.TextStyles.Item(sEstiloLetra)

thanks in advance

[Anonymous]

it also happen with

ThisDrawing.ActiveTextStyle = ThisDrawing.TextStyles.Item(sEstiloLetra)

thanks in advance

[Mikko]

I think its formatted something like

ThisDrawing.SetVariable("CLAYER", 0-IS-Indice)

[Anonymous]

wow, it works
thanks a lot

there is a lot of stuff running about managed code in NET, but not about the new syntax for usual COM projects in NET

im really lost with this situation