Freigeben über


Gewusst wie: Erstellen und Implementieren von Schnittstellen

Aktualisiert: November 2007

Wie im Abschnitt Übersicht über Schnittstellen erläutert, enthalten Schnittstellen Beschreibungen der Eigenschaften, Methoden und Ereignisse einer Klasse, ohne eine Implementierung bereitzustellen.

So erstellen Sie eine Schnittstelle

  1. Definieren Sie die Schnittstelle, indem Sie ihr Code hinzufügen, der mit dem Interface-Schlüsselwort und dem Namen der Schnittstelle beginnt und mit der Anweisung End Interface endet. Mit folgendem Code wird beispielsweise die Schnittstelle IAsset definiert.

    Interface IAsset
    End Interface
    
  2. Fügen Sie Anweisungen hinzu, die die von der Schnittstelle unterstützten Eigenschaften, Methoden und Ereignisse definieren. Mit folgendem Code werden beispielsweise eine Funktion, eine Eigenschaft und ein Ereignis definiert.

    Interface IAsset
        Event ComittedChange(ByVal Success As Boolean)
        Property Division() As String
        Function GetID() As Integer
    End Interface
    

So implementieren Sie eine Schnittstelle

  1. Wenn die zu implementierende Schnittstelle nicht Bestandteil des Projekts ist, müssen Sie einen Verweis auf die Assembly einfügen, welche die Schnittstelle enthält.

  2. Erstellen Sie eine neue Klasse, die die Schnittstelle implementiert, und fügen Sie das Implements-Schlüsselwort in die Zeile nach dem Klassennamen ein. Wenn Sie z. B. die Schnittstelle IAsset implementieren möchten, können Sie die Implementierungsklasse Computer nennen (siehe folgendes Codebeispiel).

    Class Computer
        Implements IAsset
    End Class
    
  3. Fügen Sie zum Implementieren von Eigenschaften, Methoden und Ereignissen der Klasse Prozeduren hinzu (siehe folgendes Codebeispiel, das eine Fortsetzung des oben stehenden Beispiels ist):

    Class Computer
        Implements IAsset
    
        Public Event ComittedChange(ByVal Success As Boolean) _
           Implements IAsset.ComittedChange
    
        Private divisionValue As String
    
        Public Property Division() As String _
            Implements IAsset.Division
    
            Get
                Return divisionValue
            End Get
            Set(ByVal value As String)
                divisionValue = value
                RaiseEvent ComittedChange(True)
            End Set
        End Property
    
        Private IDValue As Integer
    
        Public Function GetID() As Integer _
            Implements IAsset.GetID
    
            Return IDValue
        End Function
    
        Public Sub New(ByVal Division As String, ByVal ID As Integer)
            Me.divisionValue = Division
            Me.IDValue = ID
        End Sub
    End Class
    

Siehe auch

Aufgaben

Exemplarische Vorgehensweise: Erstellen und Implementieren von Schnittstellen

Konzepte

Übersicht über Schnittstellen

Schnittstellendefinitionen

Implements-Schlüsselwort und Implements-Anweisung

Beispiele zur Implementierung von Schnittstellen in Visual Basic

Verwendungsmöglichkeiten für Schnittstellen

Referenz

Interface-Anweisung (Visual Basic)

Weitere Ressourcen

Vererbung in Visual Basic