Reset
 
Closes all open files, or resets standard I/O handles.

Syntax

Declare Sub Reset ( )
Declare Sub Reset ( ByVal streamno As Integer )

Usage

Reset
or
Reset( streamno )

Parameters

streamno
The stream number, 0 for stdin or 1 for stdout to reset.

Description

Reset, when called with no arguments, closes all disk files.

Reset, when called with the streamno argument, will reset the redirected or piped streams associated with stdin (0), or stdout (1). Passing any value for streamno other than 0 or 1 has no effect.

Example

Open "test.txt" For Output As #1
Print #1, "testing 123"
Reset


Dim x As String

'' Read from STDIN from piped input
Open Cons For Input As #1
While EOF(1) = 0
  Input #1, x
  Print """"; x; """"
Wend
Close #1

'' Reset to read from the keyboard
Reset(0)

Print "Enter some text:"
Input x

'' Read from STDIN (now from keyboard)
Open Cons For Input As #1
While EOF(1) = 0
  Input #1, x
  Print """"; x; """"
Wend
Close #1

Differences from QB

  • None for Reset().
  • The Reset(streamno) usage are new to FreeBASIC.

See also