Option Strict On Imports System.IO Public Class Form1 Dim chemin As String Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim opendir As New FolderBrowserDialog With opendir .ShowNewFolderButton = False .RootFolder = Environment.SpecialFolder.MyDocuments If .ShowDialog = Windows.Forms.DialogResult.OK Then Dim di As New IO.DirectoryInfo(.SelectedPath) chemin = .SelectedPath Dim extFi As IO.FileInfo() = di.GetFiles("*.*") 'filtrer les fichiers Dim fi As IO.FileInfo For Each fi In extFi ListBox1.Items.Add(fi.Name) 'affiche les noms avec extension 'ListBox1.Items.Add(fi.Name.Replace(fi.Extension, ""))'affiche les noms sans extension Next Else MessageBox.Show("Operation annulée par l'utilisateur!", "Ouverture dossier", MessageBoxButtons.OK, MessageBoxIcon.Information) End If .Dispose() End With End Sub 'récupérer chemin complet en cliquant dans la listBox Private Sub ListBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ListBox1.SelectedIndexChanged MsgBox(chemin & "\" & ListBox1.SelectedItem.ToString) End Sub End Class
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
1 juil. 2015 à 17:18
je test le code et je te donne un retour...
1 juil. 2015 à 18:23
Le programme que je suis entrain de réaliser en visual studio lance un sous programme exécutable de tri de fichier.
Pour ce tri, j'ai besoin d'ouvrir avec visual une fenêtre donnant dans le répertoire où se trouve les fichiers a trier avec 3 autres sous répertoires.
La fenêtre a ouvrir me sert juste à faire glisser les fichiers à trier dans l'un de ces 3 sous répertoires jusqu'à ce qu'il n'y ai plus de fichier et non a sélectionner les fichiers pour les ouvrir.
Ainsi lorsque je fait :
Process.Start("C:/Users/repertoire")
la fenêtre s'ouvre correctement sur le répertoire en question mais elle s'ouvre à l'extérieur de la Form1 MDI Parent que j'ai créé, alors que je souhaiterai que la fenêtre soit contenue dans Form1 MDI.
Après le tri je referme la fenêtre par une commande de menu déroulant déjà créé.
A ce stade, j'ai simplement réussit a ouvrir une autre Form enfant, sans rien dessus, dans Form1 Parent.
En espérant que cela puisse renseigner d'avantage le problème qui se pose.
Merci d'avance.