VB.NET Interfaz Instantiation Oddity

Question

Estaba revisando algún código heredado que tenemos y noté algo que me pareció particularmente extraño.

Digamos que tenemos la clase concreta TestClass. TestClass implementa la interfaz ITestClass.

¿Qué tipo de comportamiento debo esperar en el siguiente caso, entonces? (No me di cuenta que esto era incluso posible)

Dim testClass as TestClass = Nothing 
Try 
    testClass = New ITestClass 
    ... 
End Try 

Por lo que yo entiendo, que se vería obligado a utilizar TestClass en lugar de su contraparte interfaz.

Answer 1

Hay un caso especial, donde una interfaz se puede instanciar como una clase, y está relacionada con el CoClassAttribute. Ver esta entrada del blog para más detalles:

• Unnatural acts on source code: Instantiating interfaces

Ejemplo de la entrada del blog traducido al VB:

<ComImport(), Guid("C906C002-B214-40d7-8941-F223868B39A5"), CoClass(GetType(Foo))> _ 
Public Interface IFoo 
End Interface 

Public Class Foo 
    Implements IFoo 
End Class 

Sub Main() 
    Dim f As New IFoo() ' Compiles 
End Sub