Besoin d'aide

Question

Salut,
Je suis débutant en VB , et j'espère faire un petit programme utilisant 
le Drag and Drop :
je veux deplacer un Label1 et le déposer juste sur une Image1 sur le meme Form , et si l'utilisateur ne le depose pas sur l'image1 le Label1 revient à sa place précedente .
J'ai essayé avec les aides des rebriques de vbfrance ...
Mais je n'ai pas arrivé !

Je remerci toute personne qui me donne ce petit code .

cs_sam20 · Answer

Tu n'arrives pas a quoi?
A selectionner l'option drag and drop ou faire revenir le label dans sa position initiale?.

cs_octani · Answer

Merci,
J'ai selectionné l'option drag and drop , mais quand j'execute mon programme je fais deplacer le label partout !
Moi je veux le poser juste sur l'image , sinon il faux il revienne à sa place precedante
Si vous pouvez me donner le code complet ,je vous remerci .

cs_MPi · Answer

Mets la propriété DragMode de ton Label à automatique
puis ce code seulement

Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)
    Set Label1.Container = Picture1
    Label1.Left = 0        'modifier au besoin
    Label1.Top = 0        'modifier au besoin
End Sub

MPi²

cs_octani · Answer

Merci ,
Apres avoir coller le code :

Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)
    Set Label1.Container = Picture1
    Label1.Left = 0      'modifier au besoin
    Label1.Top = 0      'modifier au besoin
End Sub

rien ne se passe !

cs_MPi · Answer

Comment ça... rien ne se passe (?)
peux-tu élaborer ?

MPi²

cs_octani · Answer

Merci, 


J'ai fait tout mon effort sans arriver !


j'ai cherché partout sans résultat!


j'était bloqué sur le meme sujet en VB, et après j'ai debuté avec Delphi sur le meme drag and drop ,mais sans resultat positif !


Peut etre c'est la fin ! le chemin parait très difficil!
Merci pour tout aide.

Besoin d'aide

6 réponses

Votre réponse