A voir également:
- Visibilité label par rapport au curseur vb6
- Vb6 - Télécharger - Divers Utilitaires
- Plan rapport de stage - Guide
- Comment retrouver le curseur sans souris - Guide
- Curseur souris disparu pc portable acer ✓ - Forum souris / Touchpad
- Curseur de souris - Guide
1 réponse
Bonjour,
la seule solution (que je connaisse ) consiste à "délimiter" une zone en périphérie de l'objet sur laquelle le curseur souris passera en sortant et qui permettra de déclencher une action.
Bonne suite
la seule solution (que je connaisse ) consiste à "délimiter" une zone en périphérie de l'objet sur laquelle le curseur souris passera en sortant et qui permettra de déclencher une action.
Private Sub Label2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Marge = 3 ' on détermine la largeur "sensible"
'si le curseur a franchi la marge
If (X > Marge And X < Label2.Width - Marge) And (Y > Marge And Y < Label2.Height - Marge) Then
Label3.Visible = True
Else ' dès qu'on est en périphérie
Label3.Visible = False
End If
End Sub
Bonne suite
