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