Number, propriété (objet Err)

Article
09/12/2008

Mise à jour : novembre 2007

Obtient ou définit une valeur numérique qui spécifie une erreur. Lecture/écriture.

Public Property Number() As Integer

Notes

Pour retourner à partir d'un objet une erreur définie par l'utilisateur, définissez Err.Number en ajoutant à la constante VbObjectError le nombre que vous avez choisi comme code d'erreur. Par exemple, utilisez le code suivant pour retourner le nombre 1 051 comme code d'erreur :

Err.Raise(Number:=vbObjectError + 1051, Source:="SomeClass")

Exemple

Cet exemple illustre une utilisation classique de la propriété Number dans une routine de gestion des erreurs. La propriété Description est également utilisée dans l'exemple pour fournir une description de l'erreur.

' Typical use of Number property.
Sub test()
  On Error GoTo out

  Dim x, y As Integer
  x = 1 / y   ' Create division by zero error.
  Exit Sub
out:
  MsgBox(Err.Number)
  MsgBox(Err.Description)
  ' Check for division by zero error.
  If Err.Number = 11 Then
      y = y + 1
  End If
  Resume Next
End Sub