独自例外クラス [VB.NET]

Visual Basic.NET ADO.NETデータベースプログラミング

エラーメッセージを独自例外クラスを継承

ApplicationException例外クラスを継承して、マスターテーブル保守で使用する独自例外クラスの実装

MDB版:独自例外クラスの実装

独自例外クラスは、次のメンバーを実装します。

  • データベースアクセス例外クラス
  • 社員コード例外クラス
  • 社員氏名例外クラス
  • 社員カナ例外クラス
Option Strict On       'プロジェクトのプロパティでも設定可能
 
'////////// データベースアクセス例外クラス //////////
Public Class ClsDBIOException
    Inherits ApplicationException

    '========================================================
    ' 機能:コンストラクタ
    ' 引数:エラーメッセージ
    '========================================================
    Public Sub New(ByVal errorMessage As String)
        MyBase.New(errorMessage)
    End Sub

End Class


'////////// 社員コード例外クラス //////////
Public Class ClsSyainCodeException
    Inherits ApplicationException

    '========================================================
    ' 機能:コンストラクタ
    ' 引数:エラーメッセージ
    '========================================================
    Public Sub New(ByVal errorMessage As String)
        MyBase.New(errorMessage)
    End Sub

End Class


'////////// 社員氏名例外クラス //////////
Public Class ClsSyainSimeiException
    Inherits ApplicationException

    '========================================================
    ' 機能:コンストラクタ
    ' 引数:エラーメッセージ
    '========================================================
    Public Sub New(ByVal errorMessage As String)
        MyBase.New(errorMessage)
    End Sub

End Class


'////////// 社員カナ例外クラス //////////
Public Class ClsSyainKanaException
    Inherits ApplicationException

    '========================================================
    ' 機能:コンストラクタ
    ' 引数:エラーメッセージ
    '========================================================
    Public Sub New(ByVal errorMessage As String)
        MyBase.New(errorMessage)
    End Sub

End Class
[広告]と関連コンテンツ
[広告]