Dim i As System.Int32 Dim strChaine As String = "eric" Try Dim monStreamReader As New StreamReader(TextBox1.Text) 'Stream pour la lecture Dim ligne As String ' Variable contenant le texte de la ligne Do ligne = monStreamReader.ReadLine For i = 0 To ligne.Length - strChaine.length Step 1 If ligne.Substring(i, strChaine.Length) = strChaine Then TextBox2.Text += ligne + vbNewLine End If next
par exemple si j'ai un fichier text contien un ensemble des ligne dans chaque ligne il ya une adresse email et je veux enregistrer seulment les email de hotmail
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question