With FolderBrowserDialog1 If .ShowDialog = Windows.Forms.DialogResult.OK Then ' Try ' Dim RootDir As New IO.DirectoryInfo(.SelectedPath) Dim Files As New List(Of IO.FileInfo) ' Files.AddRange(RootDir.GetFiles("*.jpg").ToList) Files.AddRange(RootDir.GetFiles("*.bmp").ToList) Files.AddRange(RootDir.GetFiles("*.png").ToList) Files.AddRange(RootDir.GetFiles("*.gif").ToList) ' If Files.Count > 0 Then ' PictureBox1.Image = Image.FromFile(Files(0).FullName) 'PictureBox2.Image = Image.FromFile(Files(1).FullName) 'PictureBox3... Else ' MessageBox.Show("Aucune image trouvé dans le répertoire.", "Aucune image", MessageBoxButtons.OK, MessageBoxIcon.Exclamation) ' End If ' Catch ex As Exception ' MessageBox.Show("Accès impossible au répertoire courrant !", "Echec de lecture du répertoire", MessageBoxButtons.OK, MessageBoxIcon.Exclamation) ' End Try ' End If ' End With
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionEt j'aimerais savoir comment afficher si possible des images dans mes pictureBox avec un même bouton Parcourir dossier que d'avoir 9 bouton associer à chaque pictureBox