Esempi di implementazione di interfacce in Visual Basic

Aggiornamento: novembre 2007

È necessario che le classi che implementano un'interfaccia ne implementino tutte le proprietà, i metodi e gli eventi.

Nell'esempio seguente vengono definite due interfacce. La seconda interfaccia, Interface2, eredita Interface1 e definisce una proprietà e un metodo aggiuntivi.

Interface Interface1
    Sub sub1(ByVal i As Integer)
End Interface

' Demonstrates interface inheritance.
Interface Interface2
    Inherits Interface1
    Sub M1(ByVal y As Integer)
    ReadOnly Property Num() As Integer
End Interface

L'esempio seguente consente di implementare Interface1, l'interfaccia definita nell'esempio precedente:

Public Class ImplementationClass1
    Implements Interface1
    Sub Sub1(ByVal i As Integer) Implements Interface1.sub1
        ' Insert code here to implement this method.
    End Sub
End Class

L'ultimo esempio consente di implementare Interface2, incluso un metodo ereditato da Interface1:

Public Class ImplementationClass2
    Implements Interface2
    Dim INum As Integer = 0
    Sub sub1(ByVal i As Integer) Implements Interface2.sub1
        ' Insert code here that implements this method.
    End Sub
    Sub M1(ByVal x As Integer) Implements Interface2.M1
        ' Insert code here to implement this method.
    End Sub

    ReadOnly Property Num() As Integer Implements _
       Interface2.Num
        Get
            Num = INum
        End Get
    End Property
End Class

Vedere anche

Attività

Procedura: creare e implementare interfacce

Procedura dettagliata: creazione e implementazione di interfacce

Concetti

Cenni preliminari sulle interfacce

Definizione di interfaccia

Parola chiave Implements e istruzione Implements

Quando utilizzare le interfacce

Riferimenti

Istruzione Interface (Visual Basic)

Istruzione Implements