Læs bestemt linie

Tags:    visual-basic

Jeg er meget nybegynder..
hvis der i en txt fil er 10 linier
hvordan kan man så bare læse linie 5 feks

//soNNe



4 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
Sorter efter stemmer Sorter efter dato
User
Bruger #661 @ 14.06.02 08:52
Jeg er meget nybegynder..
hvis der i en txt fil er 10 linier
hvordan kan man så bare læse linie 5 feks

//soNNe


Her er måske noget du kan bruge eller bygge videre på.

Private Sub Command1_Click()
Dim strfile, buf As String
Dim size, pos As Long ' bliver ikke brugt
tal = 1
strfile = "c:\\test.txt"

Open strfile For Input As #1

Do Until EOF(1) ' Åben filen og læs alle linjere, og luk filen igen
Line Input #1, buf
Debug.Print buf
If tal = 5 Then 'skriv tal for linie den skal stoppe på
End
End If
tal = tal + 1
Loop
Close #1
End Sub

Mickey




I Notepad er der en funktion under "Rediger" som hedder "Gå til.."
den kan du bruge til at gå til en bestemt linie.

Mvh. sh0rty
"Serenity now!!"



I Notepad er der en funktion under "Rediger" som hedder "Gå til.."
den kan du bruge til at gå til en bestemt linie.


Jamen det er visual basic jeg skal læse fra txt filer



Åh jeg har gjort det igen, sorry =)
kiggede ikke på hvilket forum indlægget var i..

Mvh. sh0rty
"Serenity now!!"



t