Le sous-marin privé Panel1_MouseLeave (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule Panel1.MouseLeave
Faible pnl comme panneau = C (expéditeur, panneau)
Faible rc comme rectangle = pnl.RectangleToScreen (pnl.ClientRectangle)
Sinon rc. Contient (Cursor.Position) alors
pnl. Évident = faux
Autrement
Debug.Print (« MouseLeave () mais curseur dans le panneau bondit toujours »)
Finir si
Finir le sous-marin
|