Navrací číslo řádku, na kterém došlo při provádění programu k chybě.
Syntaxe:
Erl
Návratová hodnota:
Celé číslo
Parametry:
 |
Funkce Erl navrátí pouze číslo řádku, a nikoli jeho návěští. |
Příklad:
sub ExampleError
on error goto ErrorHandler REM Nastavení programu pro zpracování chyb
Dim iVar as Integer
Dim sVar As String
REM Chyba způsobená neexistujícím souborem
iVar = Freefile
Open "\file9879.txt" for Input as #iVar
Line Input #iVar, sVar
Close #iVar
exit sub
ErrorHandler:
MsgBox "Chyba " & err & ": " & error$ + chr(13) + "Na řádku : " + Erl + chr(13) + Now , 16 ,"došlo k chybě"
end sub