Bonjour,

Je suis débutant en vb.net et j'aimerais lire toute les 3 ligne la valeur contenu dans une fichier texte. J'ai réussi à afficher toute les lignes de mon fichier texte mais je n'ai pas réussi à l'adapter pour afficher 1 ligne sur 3.
Le contenue de mon fichier texte ressemble à ça :

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
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
 
#Zone de texte 1
1
 
#Zone de texte 2
2
 
#Zone de texte 3
3
 
#Zone de texte 4
4
 
#Zone de texte 5
5
 
#Zone de texte 6
6
 
#Zone de texte 7
7
 
#Zone de texte 8
8
 
#Zone de texte 9
9
 
#Zone de texte 10
10
 
#Zone de texte 11
11
 
#Zone de texte 12
12
 
#Zone de texte 13
13
 
#Zone de texte 14
14
 
#Zone de texte 15
15
 
#Zone de texte 16
16
 
#Zone de texte 17
17
 
#Zone de texte 18
18
 
#Zone de texte 19
19
 
#Zone de texte 20
20


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
21
22
23
24
25
26
27
28
29
 
Module Module1
 
    Dim fichier As String
    Dim ligne As String
    Dim result As String
 
    Sub main()
        fichier = "D:\User\Admin\Desktop\Zone text.txt"
        Dim monStreamReader As New System.IO.StreamReader(fichier)
 
        ligne = 0
        While ligne < 60
 
            result = monStreamReader.ReadLine
            Console.WriteLine(result)
            ligne = ligne + 1
 
        End While
 
 
 
 
        Console.ReadLine()
 
 
    End Sub
 
End Module
Merci pour vos réponse