System
Closes all open files and ends the program
Syntax
`
Declare Sub System ( ByVal retval As Integer = 0 )
`
Usage
`
System( [ retval ] )
`
Parameters
`retval`
Error code returned to system.
Description
Closes all open files and returns to the system. An optional return value, an integer, can be specified to return an error code to the system. If no return value is given, a value of 0 is automatically returned. This is the same as `End` and is here for compatibility between older BASIC dialects. It is recommended to use `End` instead.
Usage of this statement does not cleanly close scope. Variables and memory are not destroyed automatically and object destructors are not called. Calling the required destructors and other clean-up should be explicitly performed before a `System` statement.
Example
`
Print "this text is shown"
System
Print "this text will never be shown"
`
Differences from QB

- None

See also

- `End`