ErrorToString (Función)

Artículo
10/07/2008

Actualización: noviembre 2007

Devuelve el mensaje de error que corresponde a un número de error determinado.

Public Shared Function ErrorToString(ByVal ErrorNumber As Integer) As String

Parámetros

ErrorNumber
Opcional. Cualquier número de error válido.

Excepciones

Tipo de excepción	Número de error	Condición
ArgumentException		ErrorNumber está fuera del intervalo.

Consulte la columna "Número de error" si está actualizando aplicaciones de Visual Basic 6.0 que utilizan el control de errores no estructurado. (Se puede comparar el número de error con respecto a Number (Propiedad, objeto Err)). Sin embargo, siempre que sea posible, se debe considerar la sustitución de dicho control de errores por Información general sobre el control estructurado de excepciones de Visual Basic.

Comentarios

La función ErrorToString examina los valores de la propiedad del objeto Err para identificar el error en tiempo de ejecución más reciente. El valor devuelto de la función ErrorToString corresponde a la propiedad Description del objeto Err. Si ErrorNumber es un número de error válido pero no está definido, ErrorToString devuelve "Application-defined or object-defined error." a la cadena. Si ErrorNumber no es válido, se produce un error. Si ErrorNumber se omite, se devuelve el mensaje correspondiente al error en tiempo de ejecución más reciente. Si no se ha producido ningún error en tiempo de ejecución o ErrorNumber es 0, ErrorToString devuelve una cadena de longitud cero ("").

En Visual Basic versión 6.0 y anteriores, la función Error proporcionaba esta funcionalidad.

Ejemplo

El siguiente código utiliza la función ErrorToString para mostrar mensajes de error que corresponden a los números de error especificados.

Dim ErrorNumber As Integer
For ErrorNumber = 61 To 64   ' Loop through values 61 - 64.
   MsgBox(ErrorToString(ErrorNumber))   ' Display error names in message box.
Next ErrorNumber