Una semplice lampadina

' Una lampadina si trova in una stanza e può essere accesa o spenta
Public Class Lampadina
    Public Property Accesa As Boolean
    Public Property Stanza As String

    Public Sub New(stanza As String)
        Me.Stanza = stanza
    End Sub

    Public Function Descrivi() As String
        Return String.Format("La lampadina che si trova nella stanza {0} è {1}", Stanza, IIf(Accesa, "accesa", "spenta"))
    End Function
End Class