Función Err

Devuelve un códigu qu'identifica l'error que se produció al executase'l programa.

Sintaxis:


Err

Valor de torna:

Enteru

Parámetros:

La función Err usar en rutines de manexu de fallos pa determinar l'erru y l'aición correutiva.

Exemplu:


Sub ExampleError
On Error Goto ErrorHandler REM Configurar xestor d'errores
Dim iVar as Integer
Dim sVar As String
REM L'erru produzse por cuenta d'un ficheru non esistente
    iVar = Freefile
    Open "\file9879.txt" for Input as #iVar
    Line Input #iVar, sVar
    Close #iVar
Exit Sub
ErrorHandler:
    MsgBox "Fallu " & Err & ": " & Fallu$ + chr(13) + "Na llinia: " + Erl + chr(13) + Now , 16 ,"producióse un fallu"
End Sub

Please support us!