NAME
ERROR Statement
SYNOPSIS
ERROR expression%
o expression% The error code of a Basic or user-defined error; a
value in the range 1 through 255. To define your own
error, use a value that isn't listed in the Basic
Run-Time Error Codes table.
DESCRIPTION
Simulates an occurrence of a Basic error or a user-defined error.
Example:
'Illustrates ERDEV, ERDEV$, ERL, ERR, ERROR, ON ERROR, and RESUME.
ON ERROR GOTO Handler
10 CHDIR "a:\" 'Causes ERR 71 "Disk not ready"
'if no disk in Drive A.
20 y% = 0
30 x% = 5 / y% 'ERR 11 "Division by zero."
40 PRINT "x% ="; x%
50 ERROR 57 'ERR 57 "Device I/O error."
Handler:
PRINT
PRINT "Error "; ERR; " on line "; ERL
SELECT CASE ERR
CASE 71
PRINT "Using device "; ERDEV$; " device error code = "; ERDEV
RESUME NEXT
CASE 11
INPUT "What value do you want to divide by"; y%
RESUME 'Retry line 30 with new value of y%.
CASE ELSE
PRINT "Unexpected error, ending program."
END
END SELECT
SEE ALSO
ERDEV ERR ERL ON ERROR RESUME