Mouvement panel

Messages postés
22
Date d'inscription
vendredi 29 avril 2011
Statut
Membre
Dernière intervention
13 septembre 2011
- - Dernière réponse : fabman21
Messages postés
22
Date d'inscription
vendredi 29 avril 2011
Statut
Membre
Dernière intervention
13 septembre 2011
- 4 mai 2011 à 12:54
Bonsoir, Depuis un moment je me creuse la tete afin de definir un mouvement a un objet ( de type panel ou picture). Par exemple je veux qu'un panel fasse des allers et retours de bas en haut (evidamment dans une form).Pourriez vous m'indiquer comment faire ? Merci d'avance
VIVE Visual Basic
Afficher la suite 

3 réponses

Messages postés
95
Date d'inscription
vendredi 7 février 2003
Statut
Membre
Dernière intervention
28 novembre 2017
0
Merci
salut,


ta question en plus de celle d'hier (keydown et panel) sonnent très exercices de cours.

donc, je ne ferais que t'aiguiller. adapte le code que je mis en réponse à ta précédente demande. c'est le même principe sauf que le test des touches n'est plus nécessaire. mets le code dans un timer et tu prends une variable booléenne à titre d'inversion de direction en entrant en butée des bords de ta Form.


bonne continuation, alKa



C'est en forgeant, que l'on devient forgeron.
Commenter la réponse de AlKatou
Messages postés
22
Date d'inscription
vendredi 29 avril 2011
Statut
Membre
Dernière intervention
13 septembre 2011
0
Merci
bonjour,Merci pour tes indications.

(Juste je fais de la programmation pour le loisir.(je n'en fais pas du tout en cours,pour l'instant)J'essaye juste de me donner des objectifs de mini programme pour apprendre a bien métriser les nombreuses fonctions de visual basic.)

VIVE Visual Basic
Commenter la réponse de fabman21
Messages postés
22
Date d'inscription
vendredi 29 avril 2011
Statut
Membre
Dernière intervention
13 septembre 2011
0
Merci
rebonjour, j'ai essayé mais j'ai 2 problème le panel ne bouge pas

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

' pour la vitesse de déplacement
Dim iCoefMove As Integer = 10000

' recalcule la nouvelle position selon la touche appuyée
' iCoefMove * Abs(0 ou -1), -1 si la touche est appuyée
Panel2.Top = Panel2.Top - iCoefMove * System.Math.Abs(CInt())
Panel2.Top = Panel2.Top + iCoefMove * System.Math.Abs(CInt())
Panel2.Left = Panel2.Left - iCoefMove * System.Math.Abs(CInt())
Panel2.Left = Panel2.Left + iCoefMove * System.Math.Abs(CInt())
End Sub

Et je ne trouve pas pour empècher les panels(celui la et celui de ma derniere question) de quitter la form j'ai trouver l'evenement mouseleave pour la sourie mais je ne sais pas faire pour un objet
VIVE Visual Basic
Commenter la réponse de fabman21