Dim dr As DialogResult = Me.OpenFileDialog1.ShowDialog() If (dr = System.Windows.Forms.DialogResult.OK) Then Dim file As String For Each file In OpenFileDialog1.FileNames LB_ListeFichier.Items.Add(OpenFileDialog1.FileName) Next file End If
For Each file as String In OpenFileDialog1.FileNames LB_ListeFichier.Items.Add(file) Next