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

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

VB.net

Posted by arkgame