Visual Basic 中学校 > Visual Basic サンプル集 > Visual Basic サンプル集目次 >

基底クラスの情報を取得する

１．基底クラスの情報を取得する

以下の例ではButton型の変数からその基底クラスの情報を取得する。

Dim MyButton As New Button Dim BaseClass As Type BaseClass = MyButton.GetType.BaseType MsgBox(BaseClass.FullName) 'System.Windows.Forms.ButtonBase等

以下の例ではクラスの型からその基底クラスを取得する。

Dim BaseClass As Type BaseClass = GetType(Button).BaseType MsgBox(BaseClass.FullName) 'System.Windows.Forms.ButtonBase等

　

２．現在のクラスの基底クラスの情報を取得する

Dim BaseClass As Type BaseClass = Me.GetType.BaseType MsgBox(BaseClass.FullName) 'System.Windows.Forms.Form等

　

３．基底クラスの基底クラスの情報を取得する

以下の例ではButtonクラスの基底クラスの基底クラスの情報を取得する。

Dim BaseBaseClass As Type BaseBaseClass = GetType(Button).BaseType.BaseType MsgBox(BaseBaseClass.FullName) 'System.Windows.Forms.Control等

  VB6には「基底クラス」という仕組みがありません。