Module
Contents
Index 🔎︎

# Erl Function

जब प्रोग्राम चलने के दौरान कोई त्रुटि होती है तो लाइन क्रमांक प्रस्तुत करता है.

## Syntax:

    Erl

## वापसी मूल्य:

पूर्णांक

## पैरामीटर

Erl फ़ंक्शन सिर्फ लाइन संख्या प्रस्तुत करता है न कि लाइन लेबल.

## उदाहरण:

    Sub ExampleError

    On Error GoTo ErrorHandler ' Set up error handler

    Dim iVar As Integer

    Dim sVar As String

    ' 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