Indhold

# Erl-funktion

Returnerer linjenummeret hvor en fejl har fundet sted under programudførslen.

## Syntaks:

    Erl

## Returværdi:

Integer

## Parametre:

Erl-funktionen returnerer kun et linjetal, og ikke en linjeetiket.

## Eksempel:

    Sub ExampleError
    On Error Goto ErrorHandler ' Opsæt fejlhåndteringen
    Dim iVar As Integer
    Dim sVar As String
    REM Fejl foranlediget af ikke-eksisterende fil
        iVar = Freefile
        Open "\file9879.txt" For Input As #iVar
        Line Input #iVar, sVar
        Close #iVar
        Exit Sub
    ErrorHandler:
        MsgBox "Fejl " & err & ": " & error$ + chr(13) + "I linje : " + Erl + chr(13) + Now, 16, "Der er opstået en fejl"
    End Sub

Relaterede emner

Fejlhåndterings-funktioner