Beispiele zur Implementierung von Schnittstellen in Visual Basic
Aktualisiert: November 2007
Klassen, die eine Schnittstelle implementieren, müssen alle zugehörigen Eigenschaften, Methoden und Ereignisse implementieren.
Im folgenden Beispiel werden zwei Schnittstellen definiert. Die zweite Schnittstelle (Interface2) erbt Interface1 und definiert eine zusätzliche Eigenschaft und eine zusätzliche Methode.
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
Das nächste Beispiel implementiert Interface1 (die Schnittstelle, die im vorherigen Beispiel definiert wurde):
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
Im abschließenden Beispiel wird Interface2 mit einer von Interface1 geerbten Methode implementiert:
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
Siehe auch
Aufgaben
Gewusst wie: Erstellen und Implementieren von Schnittstellen
Exemplarische Vorgehensweise: Erstellen und Implementieren von Schnittstellen
Konzepte
Implements-Schlüsselwort und Implements-Anweisung
Verwendungsmöglichkeiten für Schnittstellen