次の方法で共有

  • [アーティクル]

ShowCheckBox プロパティ

例外メッセージ ボックスにチェック ボックスを表示するかどうかを指定します。

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

構文

'宣言
Public Property ShowCheckBox As Boolean
    Get
    Set
'使用
Dim instance As ExceptionMessageBox
Dim value As Boolean

value = instance.ShowCheckBox

instance.ShowCheckBox = value

public bool ShowCheckBox { get; set; }

public:
property bool ShowCheckBox {
    bool get ();
    void set (bool value);
}

member ShowCheckBox : bool with get, set

function get ShowCheckBox () : boolean
function set ShowCheckBox (value : boolean)

プロパティ値

型: System. . :: . .Boolean
Boolean の値です。

説明

例外が発生した場合、実行時にチェック ボックスの値を評価して、例外メッセージ ボックスを表示するかどうかを決定できます。詳細については、「例外メッセージ ボックスをプログラムする方法」を参照してください。

既定値は false です。

使用例

           try
            {
                // Do something that may cause an exception.
                throw new ApplicationException("An error has occured.");
            }
            catch (ApplicationException ex)
            {
                string str = "The action failed.";
                ApplicationException exTop = new ApplicationException(str, ex);
                exTop.Source = this.Text;

                // Show a message box if the global variable is true.
                if (alwaysShow)
                {
                    ExceptionMessageBox box = new ExceptionMessageBox(exTop);
                    box.ShowCheckBox = true;
                    box.IsCheckBoxChecked = true;
                    box.CheckBoxText = "Always show this message";
                    box.Show(this);

                    // Set the global variable.
                    alwaysShow = box.IsCheckBoxChecked;
                }
            }

Try
    ' Do something that may cause an exception.
    Throw New ApplicationException("An error has occured.")
Catch ex As ApplicationException
    Dim str As String = "The action failed."
    Dim exTop As ApplicationException = New ApplicationException(str, ex)
    exTop.Source = Me.Text

    ' Show a message box if the global variable is true.
    If alwaysShow Then
        Dim box As ExceptionMessageBox = New ExceptionMessageBox(exTop)
        box.ShowCheckBox = True
        box.IsCheckBoxChecked = True
        box.CheckBoxText = "Always show this message"
        box.Show(Me)

        ' Set the global variable.
        alwaysShow = box.IsCheckBoxChecked
    End If
End Try