Visaul Basic :insertion image

sousou.h -  
salam!!
dans la procédure du clik sur l'image,g tapé ce code mais il fonctionne pa:l image s'affiche pa:
Private Sub Image_Click()
boite.DialogTitle = "Choisir une image !!"
boite.InitDir = App.Path
boite.Filter = "image(*.jpg)|*.jpg|image (*.gif)|*.gif|tous les fichiers(*.*)|*.*|"
boite.ShowOpen
image.Picture = LoadPicture(boite.FileName)
End sub

lorsk j exécute,le msg suivant s affiche"l objet ne gère pa cette propriété ou cette méthode"!!
--
JE SUIS REINE DE MOI MEME !!!!!!!!!!
Configuration: Windows XP
Internet Explorer 6.0

14 réponses

  1.  .nono.
    Bah, tu a mis Image_Click() et image.Picture.
    Ton image s'écrit avec une majuscule ou sans ?
    0
    1. sousou.h Auteur
      g l'ai modifié mais j crois pa ke c ça le pb, car kand le msg erreur s affiche,y a une ligne jaune sur :
      image.Picture = LoadPicture(boite.FileName)
      0
      1. .nono.
        Ah! Renomme ton machin. Il faut pas que ça soit image. Renomme le par Image1 par exemple (ton objet et ton événement et ton Image1.Picture)
        0
        1. sousou.h Auteur
          c réglé!! merci bpppppppppp
          mais y a un autre pb :( lorsque je clik sur bouton ajouter msg d erreur: "longeur d'enregistrement incorrect" ,voilà le code :
          Private Sub cmdajouter_Click()
          Dim pos As Integer
          pos = LOF(1) / Len(cand) + 1
          Call remplir
          Put #1, pos, cand
          End Sub

          POUR la procédure remplir c la suivante:
          sub remplir
          cand.code = txtcode.Text
          cand.nom = txtnom.Text
          cand.photo = boite.FileName
          end sub
          0
          2. .nono.
            Tu as mis +1. Pourquoi tu as mis +1 ?
            0
            1. .nono.
              C'est quoi cand ? Pourquoi tu n'a pas ouvert le fichier ?
              0
              1. sousou.h Auteur
                lof(1)/len(cand) désigne le nbre d enregistrements existants,
                donc pr ajouter un enregistrement ,je dois le mettre dans un emplacement vide ki est lof(1)/len(cand)+1
                0
                1. .nono.
                  Mais cand doit être du texte >.>
                  0
                  1. .nono.
                    Tu peux m'envoyer les fichiers à romeo.boxer@free.fr que je nettoie un peu tout ca ?
                    0
                    3. .nono.
                      Eh, tu vois, tu as mis dans ton Type candidat code As Integer
                      Et dans remplir() cand.code = txtcode
                      Ca colle pas, la propriété Text est toujours String ^^
                      0
                      1. .nono.
                        Suffit juste de mettre Val(), mais ton erreur est car tu enregistre un truc trop gros (dès qu'on met l'adresse de l'image ça met ce bug >.>)
                        0
                        1. sousou.h Auteur
                          merci bpppppppp
                          mais t as essayé les autres boutons?!!!
                          cela ne marche pa du tt?!!
                          0