Discussion :

[DanParad]

Bonjour, dan mon programme je doit lire dans un fichier texte et afficher le mot lus dans un TextBox mais dans le TextBox il affiche toujours 0. J'utilise visual basic 2010. Voici mon code et merci beaucoup.(je suis debutant avec vb)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 Sub ouvreFichier()
        Dim contenu(1024) As Byte
        Dim fichier As IO.FileStream
        fichier = New IO.FileStream("motsMelanges.txt", IO.FileMode.OpenOrCreate)
        fichier.Position = 1
        fichier.Read(contenu, 1, 1024)
        Me.TextBoxLettresMelangees.Text = contenu(1024)
        fichier.Dispose()
 End Sub

[clementmarcotte]

Bonjour,

Regarde le fichier que j'ai mis là:

http://www.developpez.net/forums/d15...visual-studio/

Tu n'as pas besoin de tout cela, mais, il y a une sub qui sert à remplir deux textboxes différents avec deux fichiers textes différents.

Je ne me souviens plus, si c'est avec un filestream ou un textreader, mais, cela fait la job.

[DanParad]

Bonjour, merci beaucoup j'ai trouve ce que je voulais. Je met le code au cas ou une autre personne en aurai besoin.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub ouvreFichier()        
        Dim tabCadeaux(2) As String
        Dim Reader = New System.IO.StreamReader("motsMelanges.txt")
        For Me.i = 1 To 2
            tabCadeaux(i) = Reader.ReadLine()
        Next
        FileClose()
        TextBoxMot.Text = tabCadeaux(1)
End Sub

[themine702]

sincérement plus simple :p :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim reader1 as new system.io.streamreader(tonfichier.txt)
textbox1.text = reader1.readline()
reader1.close

et puis voilà pourquoi tu te complique la vie