Module
Contents
Index 🔎︎

# Erl Function

Returns the line number where an error occurred during program execution.

## Notkun:

    Erl

## Skilagildi:

Integer

## Viðföng:

The Erl function only returns a line number, and not a line label.

## Dæmi:

    Sub ExampleError

    on error goto ErrorHandler REM Set up error handler

    Dim iVar As Integer

    Dim sVar As String

    REM Error caused by non-existent file

        iVar = Freefile

        Open "\file9879.txt" For Input As #iVar

        Line Input #iVar, sVar

        Close #iVar

        Exit Sub

    ErrorHandler:

        MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occurred"

    End Sub