Commencer par programmer le bouton Quitter. Double cliquez dessus pour faire apparaître la fenêtre d'édition du code. Voici le code de la procédure (n'ajoutez que le code en caractères gras) :
Private Sub cmdQuitter_Click()
End
End Sub
Déroulez la liste Object (Objet) et sélectionnez lblBonjour. Par défaut, VB crée une procédure événementielle Click. Déroulez la liste Prodedure et choisissez MouseMove.
La nouvelle procédure comprend un certains nombre d'arguments (Button, Shift...) que nous explorerons un peu plus tard. Pour l'instant, tapez ceci dans la procédure MouseMove :
Private sub lblBonjour_MouseMove(arguments...)
lblBonjour.ForeColor = vbRed
End Sub
Note :
vbRed est une constante de couleur de VisualBasic. Il en existe pour
les couleurs de base et pour les couleurs système.
Voir les constantes de couleurs de base.
Ne tapez rien dans la procédure Click. Elle s'effacera d'elle même si elle reste vide. Enregistrez votre projet sous le nom Bonjour.vbp dans un répertoire nommé MouseEvents ou EvenementsSouris (sans accents, c'est toujours mieux!) et la feuille sous le nom Bonjour.frm dans le même répertoire.
Appuyez sur la touche F5 ou cliquez sur le bouton
pour démarrer l'exécution du projet. Passez le pointeur
de la souris au dessus de l'étiquette Bonjour. Qu'observez-vous?