Vb changer taille bouton on mousehover
isis
-
isis -
isis -
Bonjour,
voila es ce que quelqu'un pourrait me donner l'instruction qui me permettrait d'agrandir la taille d'un bouton lorsque ma souris passe dessus svp car je n'est pas trouvé.
Merci d'avance. cordialement, isis
voila es ce que quelqu'un pourrait me donner l'instruction qui me permettrait d'agrandir la taille d'un bouton lorsque ma souris passe dessus svp car je n'est pas trouvé.
Merci d'avance. cordialement, isis
Configuration: Windows Vista Firefox 3.0.1
A voir également:
- Vb changer taille bouton on mousehover
- Changer dns - Guide
- Comment réduire la taille d'un fichier - Guide
- Reduire taille image - Guide
- Bouton on off o i - Forum Word
- Bouton shift pc ✓ - Forum Jeux vidéo
9 réponses
ah oui merci je pensais que j'avais fait une erreur dans le code car je prenais l'attribut size ! maintenant, le probleme est de faire en sorte que le bouton change de place (afin que le centre du bouton reste identique ac et sans le passage de la souris)
a ok meci maintenant il ne reste plus qu'a faire en sorte que le centre du bouton ne bouge pas car la position des objets est faite a partir du coin supérieur gauche
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Oui, et bien juste un peu de calcul et tu recolles ton bouton à la place ou tu veux grâce à .top et .left
Salut
est-ce ça que tu veux?
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Height = 750 ' ça augmente la taille
Command1.Width = 1200
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Height = 375 ' ça diminue la taille et remet à la taille d'origine en supposant que c'est un bouton de 600 X 375
Command1.Width = 600
End Sub
est-ce ça que tu veux?
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Height = 750 ' ça augmente la taille
Command1.Width = 1200
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Height = 375 ' ça diminue la taille et remet à la taille d'origine en supposant que c'est un bouton de 600 X 375
Command1.Width = 600
End Sub