Visual Basic でのインターフェイス実装例
更新 : 2007 年 11 月
インターフェイスを実装するクラスでは、プロパティ、メソッド、およびイベントをすべて実装する必要があります。
2 つのインターフェイスの定義を次の例に示します。2 番目のインターフェイス Interface2 は Interface1 を継承し、追加のプロパティとメソッドを定義します。
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
次の例では、前の例で定義したインターフェイス Interface1 を実装します。
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
最後の例では、Interface1 から継承されたメソッドを含む Interface2 を実装します。
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
参照
処理手順
概念
Implements キーワードおよび Implements ステートメント