Enhavo
Indekso 🔎︎

# Erl Function

Liveras la linian nombron kie eraro okazis dum programa ruliĝo.

## Sintakso:

    Erl

## Liverota valoro:

Entjero

## Parametroj:

La funkcio Erl liveras nur linian nombron, ne linian etikedon.

## Ekzemplo:

    Sub ExampleError
    on error goto ErrorHandler REM Starigi traktilon por eraroj
    Dim iVar As Integer
    Dim sVar As String
    REM Eraron kaŭzis neekzisto de dosiero
        iVar = Freefile
        Open "\file9879.txt" For Input As #iVar
        Line Input #iVar, sVar
        Close #iVar
        Exit Sub
    ErrorHandler:
        MsgBox "Eraro " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"Eraro okazis"
    End Sub

Rilataj temoj

Error-Handling Functions