VB.Net Changer d'image dans un PictureBox

[Résolu]
Signaler
Messages postés
926
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
10 septembre 2010
-
Messages postés
10
Date d'inscription
vendredi 22 juillet 2011
Statut
Membre
Dernière intervention
27 juillet 2011
-
Encore moi....
Encore une autre petite question...

Bon ca paraît pas mais mon programme a avancé beaucoup depuis ce matin......

J'utilise des picturebox au lieu d'utiliser des bouton. Je n'ai pas assez d'espcae pour utiliser un bouton avec du texte dans ce dernier.
Donc le pictureBox est la solution pour moi.
J'aimerais que quand je clique sur la PictureBox, l'image est modifier afin de montrer qu'il y a eu un clique sur le Picturebox.

Comment je fais pour coder un changement d'image à mon picturebox ??????

PictureBox.System.Drawing.Bitmap = (app &

"image.bmp") ??????

Merci de votre aide

5 réponses

Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
34
Ha oui, encore et toujours ce compact framework
Essaye avec
PictureBox.Image = New System.Drawing.Bitmap("image.bmp")

__________
Kenji
(
Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
34
Salut,

Je pense que tu devrai avant toute chose, regarder des cours, tutos et sources parsque tu mélange vraiment tout.
PictureBox.Image = System.Drawing.Image.FromFile("image.bmp")

__________
Kenji
(
Messages postés
926
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
10 septembre 2010
4
hum j'avais essayé ce truc mais ca me dit que 'FromFile' is not a member of 'System.Drawing.Image'
Messages postés
2
Date d'inscription
dimanche 7 novembre 2010
Statut
Membre
Dernière intervention
20 juin 2011

Et pour les imeges animé Gif ?
Messages postés
10
Date d'inscription
vendredi 22 juillet 2011
Statut
Membre
Dernière intervention
27 juillet 2011

voila skue tu veu : poure parcrire des image
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


End Sub