qb45advr.hlp (Topic list)
FREEFILE Function Programming Example
  QuickSCREEN      Details     Example      Contents      Index
──────────────────────────────────────────────────────────────────────────────
FREEFILE Function Programming Example
 
The example below uses FREEFILE to obtain a file number for
opening a file:
 
INPUT "Enter file name ", Filename$
Filenum = FREEFILE
OPEN Filename$ FOR OUTPUT AS Filenum
PRINT Filename$;" opened as File #"; Filenum
 
Sample Output
 
Enter file name: DATA.DAT
 
DATA.DAT opened as File # 1