Deler linien op i flere dele, ved brug af EOF. Hvorfor?

Er der en der kan fortælle mig hvad det er der sker her.

Jeg henter en txt fil og løber igennem med EOF. Jeg har til min skræk set at når den henter en linie ind i data deles den op i 3 dele. dvs at loopet skal 3 gange rundt for at vise hele denne linie.

  R X57001_M41_KPulse = 0 ; PulseLen if PulseProp or Rate if PulseRate, ManAutoSelect = Auto, digital output 4

de kommer som.

1. "  R X57001_M41_KPulse = 0 ; PulseLen if PulseProp or Rate if PulseRate, "

2. "ManAutoSelect = Auto,"

3. " digital output 4 "

Skulle den ikke hente det ind, altså hele linie?

Er der nogen parameter der skal bruges? Så hele linie kommer ind første gang.

Program stump.

FilSti = Me.TextBoxFilSti_2.Text & HentFil(0)
    Open FilSti For Input As #1
    While EOF(1) = False
        Input #1, Data
        If Data = AIKortNr(TalNedad, 0) Then
            TalNedad = TalNedad + 1
        End If
    Wend
Close 1