通过

  • 项目

ExceptionMessageBox 构造函数 (Exception)

Creates an instance of ExceptionMessageBox by using information from the specified Exception.

命名空间：  Microsoft.SqlServer.MessageBox
程序集：  Microsoft.ExceptionMessageBox（在 Microsoft.ExceptionMessageBox.dll 中）

语法

声明
Public Sub New ( _
    exception As Exception _
)
用法
Dim exception As Exception

Dim instance As New ExceptionMessageBox(exception)

public ExceptionMessageBox(
    Exception exception
)

public:
ExceptionMessageBox(
    Exception^ exception
)

new : 
        exception:Exception -> ExceptionMessageBox

public function ExceptionMessageBox(
    exception : Exception
)

参数

  • exception
    类型：System. . :: . .Exception
    Exception that contains the top-level text, inner exception text, caption, data, help link, and optional additional information to display in the exception message box.

示例

           try
            {
                // Do something that may generate an exception.
                throw new ApplicationException("An error has occured");
            }
            catch (ApplicationException ex)
            {
                // Define a new top-level error message.
                string str = "The action failed.";

                // Add the new top-level message to the handled exception.
                ApplicationException exTop = new ApplicationException(str, ex);
                exTop.Source = this.Text;

                // Show an exception message box with an OK button (the default).
                ExceptionMessageBox box = new ExceptionMessageBox(exTop);
                box.Show(this);
            }

Try
    ' Do something that may generate an exception.
    Throw New ApplicationException("An error has occured")
Catch ex As ApplicationException
    ' Define a new top-level error message.
    Dim str As String = "The action failed."

    ' Add the new top-level message to the handled exception.
    Dim exTop As ApplicationException = New ApplicationException(str, ex)
    exTop.Source = Me.Text

    ' Show an exception message box with an OK button (the default).
    Dim box As ExceptionMessageBox = New ExceptionMessageBox(exTop)
    box.Show(Me)
End Try