Wyliczenie ExceptionMessageBoxDefaultButton

Ustawia domyślny przycisk w oknie komunikatu wyjątek.

Przestrzeń nazw:  Microsoft.SqlServer.MessageBox
Zestaw:  Microsoft.ExceptionMessageBox (w Microsoft.ExceptionMessageBox.dll)

Syntax

'Deklaracja
Public Enumeration ExceptionMessageBoxDefaultButton
'Użycie
Dim instance As ExceptionMessageBoxDefaultButton

public enum ExceptionMessageBoxDefaultButton

public enum class ExceptionMessageBoxDefaultButton

type ExceptionMessageBoxDefaultButton

public enum ExceptionMessageBoxDefaultButton

Elementy członkowskie

	Nazwa elementu członkowskiego	Opis
	Button1	Pierwszy przycisk jest przyciskiem domyślnym.
	Button2	Drugi przycisk jest przyciskiem domyślnym.
	Button3	Trzeci przycisk jest przyciskiem domyślnym.
	Button4	Czwarty przycisk jest przyciskiem domyślnym.
	Button5	Piąty przycisk jest przyciskiem domyślnym.

Przykłady

         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

Zobacz także

Reference

Przestrzeń nazw Microsoft.SqlServer.MessageBox