Public Class Marta Implements ICafeDeLaEsquina Public Sub PedirEnsalada(ByVal Tipo As Ensalada) Implements ICafeDeLaEsquina.PedirEnsalada End Sub Public Sub PedirSanguche(ByVal QuePan As Pan) Implements ICafeDeLaEsquina.PedirSanguche End Sub End Class ' Cafe de la esquina Public Enum Pan Arabe = 0 Frances = 1 End Enum Public Enum Ensalada Martin = 0 Cesar = 1 End Enum Public Interface ICafeDeLaEsquina Sub PedirSanguche(ByVal QuePan As Pan) Sub PedirEnsalada(ByVal Tipo As Ensalada) End Interface