Herencia en Visual Basic

Inherits, Overridable y MyBase en una jerarquía de dos clases.

Dim probes As Sensor() = {New Sensor(), New Thermometer()}
For Each p In probes
    Console.WriteLine(p.Describe())
Next

Class Sensor
    Public Overridable Function Describe() As String
        Return "generic sensor"
    End Function
End Class

Class Thermometer
    Inherits Sensor

    Public Overrides Function Describe() As String
        Return MyBase.Describe() & ", tuned for heat"
    End Function
End Class

Cómo funciona

1. Overridable invita a reemplazar; Overrides acepta.
2. Inherits Sensor toma todo lo que el padre definió.
3. MyBase.Describe() parte de la respuesta del padre y la extiende.

Palabras clave y builtins usados aquí

• Class
• Dim
• Each
• End
• For
• Function
• Inherits
• MyBase
• New
• Next
• Overridable
• Overrides
• Public
• Return
• String

El intento, en números

Líneas

18

Caracteres a escribir

378

Tokens

78

Ritmo de tres estrellas

90 tpm

Al ritmo de tres estrellas de 90 tokens por minuto, este intento toma unos 52 segundos.

Escribe este fragmento

Paso 2 de 3 en Clases e interfaces; paso 17 de 29 en Fundamentos del lenguaje.

← Anterior Siguiente →