Error handling function to return the line where the error occurred
Syntax
Usage
result = Erl
Return Value
An
Integer return value containing the line number where the last error occurred.
Description
Erl will return the line number where the last error occurred. If no error has occurred, Erl will return 0.
Erl cannot always be used effectively -- QB-like error handling must be enabled.
Erl is reset by RESUME and RESUME NEXT
Example
' compile with -lang fblite or qb
#lang "fblite"
' note: compilation with '-ex' option is required
On Error Goto ErrorHandler
' Generate an explicit error
Error 100
End
ErrorHandler:
Dim num As Integer = Err
Print "Error "; num; " on line "; Erl
Resume Next
' Expected output is
' Error 100 on line 6
Differences from QB
- FreeBASIC returns the source code line number and ignores the values of all explicit line numbers, where as QB returns the last encountered explicit line number, and will return zero (0) when explicit line numbers are not used.
See also