Bonsoir,
J'aimerais bien déplacer un bouton d'une certaine distance et que l'utilisateur puisse voir son déplacement en entier.
J'ai trouvé une vidéo explicative mais le code ne fonctionne pas chez moi, je ne sais pas si c'est une erreur de ma part ou bien que cela ne fonctionne pas avec ce que je veux faire.
Voici mon code (Le boutons ce déplace mais sans qu'on le voit)
Private Sub CmdStart_Click()
secondes = 0.1
For i = 1 To 200
timer_avant = Timer
Do While Timer < timer_avant - secondes
DoEvents
Loop
Cmd1.Left = 204 - i
Cmd2.Left = 204 - i
Next
End Sub
Merci de vos réponses.