cuerty

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