ExceptionMessageBoxDialogResult 列挙体

カスタム テキスト ボタンが使用されている場合に、例外メッセージ ボックスを閉じるためにユーザーがクリックしたボタンを識別します。

名前空間:  Microsoft.SqlServer.MessageBox
アセンブリ:  Microsoft.ExceptionMessageBox (Microsoft.ExceptionMessageBox.dll)

構文

'宣言
Public Enumeration ExceptionMessageBoxDialogResult
'使用
Dim instance As ExceptionMessageBoxDialogResult

public enum ExceptionMessageBoxDialogResult

public enum class ExceptionMessageBoxDialogResult

type ExceptionMessageBoxDialogResult

public enum ExceptionMessageBoxDialogResult

メンバー

	メンバー名	説明
	None	カスタム テキスト ボタンは使用されていません。
	Button1	最初のカスタム テキスト ボタンです。
	Button2	2 番目のカスタム テキスト ボタンです。
	Button3	3 番目のカスタム テキスト ボタンです。
	Button4	4 番目のカスタム テキスト ボタンです。
	Button5	5 番目のカスタム テキスト ボタンです。

使用例

            try
            {
                // Do something that may cause an exception.
                throw new ApplicationException("An error has occured");
            }
            catch (ApplicationException ex)
            {
                string str = "Action failed. What do you want to do?";
                ApplicationException exTop = new ApplicationException(str, ex);
                exTop.Source = this.Text;

                // Show the exception message box with three custom buttons.
                ExceptionMessageBox box = new ExceptionMessageBox(exTop);

                // Set the names of the three custom buttons.
                box.SetButtonText("Skip", "Retry", "Stop Processing");

                // Set the Retry button as the default.
                box.DefaultButton = ExceptionMessageBoxDefaultButton.Button2;
                box.Symbol = ExceptionMessageBoxSymbol.Question;
                box.Buttons = ExceptionMessageBoxButtons.Custom;

                box.Show(this);

                // Do something, depending on the button that the user clicks.
                switch (box.CustomDialogResult)
                {
                    case ExceptionMessageBoxDialogResult.Button1:
                        // Skip action
                        break;
                    case ExceptionMessageBoxDialogResult.Button2:
                        // Retry action
                        break;
                    case ExceptionMessageBoxDialogResult.Button3:
                        // Stop processing action
                        break;
                }
            }

Try
    ' Do something that may cause an exception.
    Throw New ApplicationException("An error has occured")
Catch ex As ApplicationException
    Dim str As String = "Action failed. What do you want to do?"
    Dim exTop As ApplicationException = New ApplicationException(str, ex)
    exTop.Source = Me.Text

    ' Show the exception message box with three custom buttons.
    Dim box As ExceptionMessageBox = New ExceptionMessageBox(exTop)

    ' Set the names of the three custom buttons.
    box.SetButtonText("Skip", "Retry", "Stop Processing")

    ' Set the Retry button as the default.
    box.DefaultButton = ExceptionMessageBoxDefaultButton.Button2
    box.Symbol = ExceptionMessageBoxSymbol.Question
    box.Buttons = ExceptionMessageBoxButtons.Custom

    box.Show(Me)

    ' Do something, depending on the button that the user clicks.
    Select Case box.CustomDialogResult
        Case ExceptionMessageBoxDialogResult.Button1
            ' Skip action
        Case ExceptionMessageBoxDialogResult.Button2
            ' Retry action
        Case ExceptionMessageBoxDialogResult.Button3
            ' Stop processing action
    End Select
End Try

関連項目

参照

Microsoft.SqlServer.MessageBox 名前空間