「VB.NET」 Implementsでインターフェースを実装する

2014年3月15日2021年9月15日

書式
1.アクセス修飾子 class クラス名 Implements インターフェース名
2.Public Function メソッド名() Implements インターフェース名.メソッド名

使用例

'インターフェースInterfAの定義
Public Interface InterfA
    '抽象メソッド
    Function FuncA()
End Interface


'複数のインターフェースを実装
Public Class Sample
    Implements InterfA


    'インターフェースAのメソッドをオーバーライド
    Public Function FuncA() Implements InterfA.FuncA
        Return "インターフェースAのメソッドfuncAの実装　Message 12345"
    End Function
End Class

Module Module1

    Sub Main()
        'クラスのインスタンス生成
        Dim cft As New Sample()
        '実装クラスのメソッドを呼び出す
        Console.WriteLine(cft.FuncA())
        Console.ReadKey()
    End Sub

End Module

結果
インターフェースAのメソッドfuncAの実装　Message 12345