エラーを指定する数値を戻すか設定します。Numberは、Errオブジェクトのデフォルト・プロパティです。
構文
object.Number
引数:
Object: 必須。常にErrオブジェクト
次のコードは、Numberプロパティの使用方法を示しています。
Sub RaiseBuiltInError()
On Error Resume Next ' Enable error handling.
Err.Raise 13 ' Raise a Type Mismatch error.
Output = "Error # " & Err.Number & ": " & Err.Description
Err.Clear ' Clear the error.
End Sub
'Output: Error # 13: Type mismatch