Changer la couleur d'un intitulé, zone de texte .... Onfocus

Changer la couleur d'un intitulé, zone de texte .... Onfocus - VB/VBA/VBS - Programmation

Marsh Posté le 02-08-2002 à 19:59:17    

Bonjour,
 
        J'ai dans un formulaire, un intitulé (ou etiquette...) et je souhaite que lorsque l'utilisateur passe la souris sur la zone celle-ci change de couleur... comme sur certain site web (menu)
 
 
        de même, j'ai une zone de texte que je souhaite grise (par exemple) et que lorsque l'utilisateur passe la souris sur la zone celle-ci change de couleur (blanc).
 
 
merci  
 
Gwendal

Reply

Marsh Posté le 02-08-2002 à 19:59:17   

Reply

Marsh Posté le 02-08-2002 à 20:59:33    

Associe du code aux évènements MouseOver de chacun de tes contrôles. Par exemple pour un textbox nommé Txt_Test1, ça donne un code du genre :
 
Private Sub Txt_Test1_Mouseover(x as single, y as single, ...)
     Txt_Test1.Backcolor = vbWhite
End Sub
 
Ensuite, faut coder le cas où la souris n'est plus sur la zone : là tu as plusieurs solutions. Utiliser un timer pour vérifier si la souris est encore dans la zone ; coder la procédure MouseOver pour la feuille et effectuer les tests ou autre chose : à toi de voir ;)


---------------
Kekman alias PauloLaFrite : rédacteur à ses temps perdus & bouffon de service sur M @ tbe .com :na:
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed