Keskustelu: Koodit: VB6: Tiedoston lukeminen kerralla

Tällä rutiinilla on helppoa ja nopeata lukea isokin tekstitiedosto tekstikenttään. Rutiini on paljon nopeampi verratuna tapaan, jossa tiedosto luetaan rivi kerrallaan Line Input #x, rivi -tyyliin.

Dim ff As Integer
Dim fname As String

ff = Freefile
fname = "tiedosto.txt"

'Tässä esimerkissä luetaan tekstitiedosto fname
'Text1-tekstikenttään

Open fname For Input As #ff
    Text1.Text = Input(LOF(ff), #ff)
Close #ff

Jaa-a

Jaa-a

Mistähän tuo LOF lyhenne mahtaa tulla? Luultavasti joku ---- Of File, niin kuin EOF.

lainaus:

Mistähän tuo LOF lyhenne mahtaa tulla?

Olisikohan Length Of File ? Näin minä ainakin päättelisin :)

ei toimi