Need help with BASIC

Delano_Lucas · 07-25-2006, 08:05 PM

I want to make a .txt reader in the BASIC Language. It is being built into another program. Here's the Reader Subprogram:

[text]
Filedialog "Pick a .txt to open.", "*.txt", file$
open file$ for input as #1
input #1, var$
print var$
wait

the problem is that it only wants to display the first line of a document....How can I edit this to allow it to view a document in it's entirety?

P.S. Please include the edited code with your post!

Thanks in advance!

rednuht · 07-26-2006, 02:30 PM

Code:

Filedialog "Pick a .txt to open.", "*.txt", file$
open file$ for input as #1
do while not eof(1) 
    input #1, var$
    print var$
    wait
loop

I would also suggest a

Code:

close #1

on the end
so all I did is add a loop that repeats the get/print a line you already had over and over until the end of file (eof)