「VB.NET」Inheritsで親クラスを継承するサンプル

2014年6月29日2021年10月19日

書式

1.親クラスの定義
Class 親クラス
　　親クラスの処理コード
End Class

2.子クラスは親クラスの機能を継承
Class 子クラス　
　　　　　Inherits 親クラス
　　子クラスの処理コード
End Class

使用例

Module Module1

    '親クラス
    Public Class Sample
        Public userName As String
        Public userNo As Integer

    End Class
    '子クラス
    Public Class SampleA
        Inherits Sample
        Public addr As String
    End Class

    Sub Main()
        '子クラスのインスタンスの生成
        Dim tt As New SampleA
        tt.addr = "tokyo"

        '親クラスのメンバーuserName
        tt.userName = "山田太郎"

        '親クラスのメンバーuserNo
        tt.userNo = 321

        Console.WriteLine("名前: " & tt.userName + " 番号: " & tt.userNo.ToString() + " 場所: " & tt.addr)
        Console.ReadKey()
    End Sub

End Module

結果
名前: 山田太郎 番号: 321 場所: tokyo