Bonjour,

Voilà je souhaite pouvoir laisser le choix à l'utilisateur d'importer un fichier txt (celui qu'il souhaite) mais le problème c'est que je n'arrive pas à lire ce fichier et en plus le type DialogResult n'est pas reconnu dans ma windows forms

Je vous met le code en espèrant que quelqu'un puisse m'aider

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
Private Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
        'configuation de l'openfiledialogue du fichier txt
        Dim OpenFichieTxt As New OpenFileDialog
        OpenFichieTxt.FileName = ""
        OpenFichieTxt.InitialDirectory = "C:\"
        OpenFichieTxt.Filter = "Fichiers txt (*.txt)|*.txt"
        OpenFichieTxt.FilterIndex = 1
        OpenFichieTxt.Title = "Ouvrir un fichier txt"
        OpenFichieTxt.RestoreDirectory = True
        Dim result As Forms.DialogResult = OpenFichieTxt.ShowDialog() 'affiche la boite
        If (result = Forms.DialogResult.OK) Then
            'traitement souhaité
            Dim sr As StreamReader = New StreamReader(OpenFichieTxt.FileName)
            TextBox1.Text = sr.ReadLine
            TextBox2.Text = sr.ReadLine
            TextBox3.Text = sr.ReadLine
            TextBox4.Text = sr.ReadLine
            TextBox5.Text = sr.ReadLine
            TextBox6.Text = sr.ReadLine
            TextBox7.Text = sr.ReadLine
            sr.Close()
        End If
    End Sub