Err
 
Error handling function to return the error number of the last error

Syntax
Usage

result = Err

Return Value

After an error, returns the error code that occurred.

Description

Err can always be used, even if QB-like error handling is not enabled.

Err is reset by Resume and Resume Next.

NOTE: Print Err after an error occurred may end up printing 0, because Print sets a new Err value when executed. To print an Err value it should be first copied to an auxiliary variable and print that one.

See Runtime Error Codes for a listing of runtime error numbers and their associated meaning.

Example

An example using QBasic style error handling (compile with -ex option)
'' Compile with -lang fblite or qb

#lang "fblite"

On Error Goto Error_Handler
Error 150
End

Error_Handler:
  n = Err
  Print "Error #"; n
  Resume Next

An example using inline error handling
Dim a As String

Do
    Line Input "Input filename: ", a
    If a = "" Then End
    Open a For Input As #1
Loop Until Err = 0

Print "File " & a & " opened successfully"
Close #1


Differences from QB

  • Error numbers are not the same as in QB.

See also