Err Function

Devuelve un códigu qu'identifica l'erru que se produció mientres la execución del 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