home *** CD-ROM | disk | FTP | other *** search
/ HomeWare 14 / HOMEWARE14.bin / windows / win31 / lb09d.arj / READ.BAS < prev    next >
BASIC Source File  |  1992-03-28  |  214b  |  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.