home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / w3_prog / lbas09p2.arj / READ.BAS < prev    next >
Encoding:
BASIC Source File  |  1992-03-28  |  214 b   |  14 lines
  1.  
  2.  
  3.     'read testfile and display each item on its own line
  4.  
  5.     open "testfile" for input as #in
  6.  
  7. [read]
  8.     while eof(#in) = 0
  9.         input #in, string$
  10.         print string$
  11.     wend
  12.  
  13.     close #in
  14.