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