Number (Propiedad, objeto Err)

Artículo
10/07/2008

Actualización: noviembre 2007

Lectura y escritura.

Public Property Number() As Integer

Comentarios

Cuando se devuelva un error definido por el usuario desde un objeto, se debe establecer Err.Number y agregar, para ello, el número seleccionado como código de error a la constante VbObjectError. Por ejemplo, cuando use el siguiente código para devolver el número 1051 a modo de código de error:

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

Ejemplo

En este ejemplo se muestra un uso típico de la propiedad Number en una rutina de control de errores. También se usa la propiedad Description en el ejemplo para proporcionar una descripción del error.

' 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