Hakemisto: QBasic: Tiedostot: EOF

Funktio ilmoittaa tiedoston loppumisesta.

EOF(tiedostonumero)

Funktion palautusarvo on tosi, jos tiedosto, jonka tiedostonumero on tiedostonumero, on luettu loppuun. Funktio on käyttökelpoinen silloin, kun tiedoston rivien tai tietueiden määrää ei tunneta.

Esimerkki:

'lukee tekstitiedoston kokonaan ja tulostaa sen rivit näytölle
DIM rivi AS STRING
OPEN "teksti.txt" FOR INPUT AS #1
DO UNTIL EOF(1)
   LINE INPUT #1, rivi
   PRINT rivi
LOOP
CLOSE #1