Active JavaScript en el navegador para mostrar las páginas de ayuda de LibreOfficeDev.

Función Err

Devuelve un código que identifica el error que se ha producido durante la ejecución del programa.

Sintaxis:


Err

Valor de retorno:

Entero

Parámetros:

La función Err se usa en rutinas de manejo de errores para determinar el error y la acción correctiva.

Ejemplo:


Sub ExampleError
On Error Goto ErrorHandler REM Configurar manipulador de errores
Dim iVar as Integer
Dim sVar As String
REM El error se produce debido a un archivo no existente
    iVar = Freefile
    Open "\file9879.txt" for Input as #iVar
    Line Input #iVar, sVar
    Close #iVar
Exit Sub
ErrorHandler:
    MsgBox "Error " & Err & ": " & Error$ + chr(13) + "En la línea: " + Erl + chr(13) + Now , 16 ,"se ha producido un error"
End Sub