Erreur de code ?

Ycc -  
Kalissi Messages postés 218 Date d'inscription   Statut Membre Dernière intervention   -
Salut ou et mon erreur sur ce code ?

If PictureBox1.Image = My.Resources.Cerise Then
MsgBox("Ceci et une cerise")
End If


Merci
A voir également:

3 réponses

FRED92G Messages postés 290 Date d'inscription   Statut Membre Dernière intervention   4
 
if picturebox1.image = my.resources.resources.cerise then

voila le code si j ai bien comprie ton probleme
0
Ycc
 
Ce que je ve faire c'est si il a une image de cerise dans la picturebox (qui et dans my.resources) alors une msgbox dit cerise
0
FRED92G Messages postés 290 Date d'inscription   Statut Membre Dernière intervention   4
 
C EST SE QUE JE PENCER ON ETE BIEN SUR LA MEME IDEE DONC SE QUE JE T ES DONNER DOIT ETRE BON
0
FRED92G Messages postés 290 Date d'inscription   Statut Membre Dernière intervention   4
 
' teste si l image cerise se trouve dans les resources

if picturebox1.image = my.resources.resources.cerise then

' teste si l image cerise et bien dans le picturebox

If PictureBox1.Image = My.Resources.Cerise Then

MsgBox("Ceci et une cerise")
End If
end if

voila ton code j ai réfléchie de nouveau et la sa serai plus sa que tu veux faire
0
Ycc
 
Non toujours une erreur :s

Opérateur '=' n'est pas défini pour les type system.drawing.image
0
FRED92G Messages postés 290 Date d'inscription   Statut Membre Dernière intervention   4
 
SE QUI FAUT FAIRE C EST UNE COMPARAISON D IMAGE ENTRE CELLE QUI SE TROUVE DANS TON PICTUREBOX ET CELLE DE T ES RESOURCES MES LA JE VOIT PAS COMMENT FAIRE C EST LE TROU DE MÉMOIRE COMPLET POUR MOI ET POUR TEMPS JE LES DÉJÀ FAIT
0
FRED92G Messages postés 290 Date d'inscription   Statut Membre Dernière intervention   4
 
OU VOIR CHARGER TON IMAGE EN DOUBLE PICTUREBOX ET COMPARAI LES PICTUREBOX
0
Kalissi Messages postés 218 Date d'inscription   Statut Membre Dernière intervention   20
 
Bonjour,

Question très problématique. Je n'ai trouvé qu'une astuce pour résoudre
le problème.

Soit une gestion aléatoire du contenu d'un objet PictureBox.
J'ai utilisé la propriété Tag du PictureBox pour sauvegarder le nom de
l'image insérer dans le PictureBox.


Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click

Dim Indice As Int32 = 0
Dim Rand As New Random()

Indice = Rand.Next(1, 5)
Me.tbxNumero.Text = Indice.ToString

Select Case Indice

Case 1
PictureBox1.Image = My.Resources.Fraise
PictureBox1.Tag = "Fraise"
Case 2
PictureBox1.Image = My.Resources.Melon
PictureBox1.Tag = "Melon"
Case 3
PictureBox1.Image = My.Resources.Cerise
PictureBox1.Tag = "Cerise"
Case 4
PictureBox1.Image = My.Resources.Banane
PictureBox1.Tag = "Banane"
Case 5
PictureBox1.Image = My.Resources.Framboise
PictureBox1.Tag = "Framboise"

End Select

Dim Element As String = PictureBox1.Tag
If (Element.Equals("Cerise")) Then
MessageBox.Show(String.Concat("Indice = ", Indice, " - Élément = ", Element))
End If

End Sub

Bon, il existe peut-être mieux, mais cette solution fonctionne.

Testé sous VB2008.

K
0