Bonjour,

Débutant ayant besoin d'aide...

Je souhaite faire une recherche dans un fichier texte et afficher le résultat dans une textbox

Mon fichier texte est constitué de différentes lignes, voici un exemple:
date:21/06/09
nom:Toto
ref:08352542
ect...

J'ai besoin de recupérer le numéro de la référence (08352542 dans notre exemple) et de l'afficher dans une textbox

J'ai commencé à faire un bout de code mais cela ne me permet que de recuperer la dernière ligne du fichier

Vraiment besoin d'aide, merci beaucoup d'avance


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public Class Form1
 
Private Sub Generer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
 
Dim Line As String
 
FileOpen(1, "C:\Users\Romain\Desktop\toto.txt", OpenMode.Input)
 
While Not EOF(1)
 
Line = LineInput(1)
TextBox1.Text = Line(1)
 
End While
 
FileClose(1)
 
End Sub
End Class