Un peu de code vaut mieux qu'un long discours :

Je trouve que l'info bulle est très "molle", elle se déclenche vraiment quand on titille le bouton et après plusieurs secondes.
Dois-je mettre deux événements pour qu'elle soit plus vive ? Quel évenement mettre en plus du mouseHover ?

A part ça, elle fonctionne ainsi : Au survol, une info bulle dit "Score : 56" ou bien "Score : 0" s'il n'y a pas de carré.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
    'calcul dynamique au survol du gain escompté pour carre
    Private Sub carre_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles carre.MouseHover
        If tour <> 0 Then
            Dim InfoBulle = New System.Windows.Forms.ToolTip
            majMesDes()
            testeCarre()
 
            If monBonus <> 0 Then
                monBonus = ContratYams(9).valeur + monBonus
            End If
 
            InfoBulle.IsBalloon = True
            InfoBulle.ToolTipTitle = "Score"
 
            InfoBulle.SetToolTip(sender, monBonus)
        End If
    End Sub