VB、継承の書き方。

単純に継承するパターン。

test_classをtest_class_plusに継承する場合。

Public Class test_class

Public hoge As Long

End Class

Public Class test_class_plus

'test_classを継承

Inherits test_class

Public fuga As Long

'メソッド定義

Public Function return_hoge()

Dim piyo As Long

piyo = 0

piyo = hoge + fuga

Return piyo

End Function

End Class

で、test_class_plusは下記と同等になる。test_classにSubやFunctionが有っても同様。

Public Class test_class_plus

Public hoge As Long

Public fuga As Long

Public Function return_piyo()

Dim piyo As Long

piyo = 0

piyo = hoge + fuga

Return piyo

End Function

End Class

overrideするパターン。