「VB.NET」複数のインターフェースを実装するクラスのサンプル
書式
1.public class クラス名
Implements インターフェース1,インターフェース2
2.Public Function メソッド名() Implements インターフェース1.メソッド名
使用例
'インターフェースInterfAの定義 Public Interface InterfA Function FuncA() End Interface 'インターフェースInterfBの定義 Public Interface InterfB Function FuncB() End Interface '複数のインターフェースを実装 Public Class Sample Implements InterfA, InterfB 'インターフェースAのメソッドを実装 Public Function FuncA() Implements InterfA.FuncA Return "インターフェースAのメソッドfuncAの実装 Message Abc" End Function 'インターフェースBのメソッドを実装 Public Function FuncB() Implements InterfB.FuncB Return "インターフェースAのメソッドfuncBの実装 Message Def" End Function End Class Module Module1 Sub Main() 'クラスのインスタンス生成 Dim cft As New Sample() '実装クラスのメソッドを呼び出す Console.WriteLine(cft.FuncA()) '実装クラスのメソッドを呼び出す Console.WriteLine(cft.FuncB()) Console.ReadKey() End Sub End Module
実行結果
インターフェースAのメソッドfuncAの実装 Message Abc
インターフェースAのメソッドfuncBの実装 Message Def