ExceptionMessageBoxDialogResult 枚举
Identifies the button that the user clicked to close the exception message box when custom text buttons are used.
命名空间: 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 | Custom text buttons are not used. | |
Button1 | The first custom text button. | |
Button2 | The second custom text button. | |
Button3 | The third custom text button. | |
Button4 | The fourth custom text button. | |
Button5 | The fifth custom text button. |
示例
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