ErrObject.Clear メソッド

public:
 void Clear();

public void Clear();

member this.Clear : unit -> unit

Public Sub Clear ()

例

この例では、 Err オブジェクトの Clear メソッドを使用して、 Err オブジェクトの数値プロパティを 0 にリセットし、その文字列プロパティを長さ 0 の文字列にリセットします。 Clearの呼び出しがない場合、MsgBoxの 2 回目の呼び出しでは、同じエラー メッセージが表示されます。

Sub ClearErr()
  ' Produce overflow error
  On Error Resume Next
  Dim zero As Integer = 0
  Dim result As Integer = 8 / zero
  MsgBox(Err.Description)
  Err.Clear()
  MsgBox(Err.Description)
End Sub

注釈

Clearで遅延エラー処理を使用する場合など、エラーが処理された後にErr オブジェクトを明示的にクリアするには、On Error Resume Nextを使用します。 Clear メソッドは、次のいずれかのステートメントが実行されるたびに自動的に呼び出されます。

• 任意の種類の Resume ステートメント

• Exit Sub、 Exit Function、または Exit Property

• 任意の On Error ステートメント

• 任意の Try...Catch...Finally ステートメント

  Note

  On Error Resume Nextコンストラクトは、他のオブジェクトへのアクセス中に生成されたエラーを処理するときにOn Error GoToすることをお勧めします。 オブジェクトを操作するたびに Err チェックすると、コードによってアクセスされたオブジェクトのあいまいさが解消されます。エラー コードを Err.Numberに配置したオブジェクトと、最初にエラーを生成したオブジェクト ( Err.Source で指定されたオブジェクト) を確認できます。

こちらもご覧ください

• Err()
• ErrorToString()
• エラー ステートメント (Visual Basic)