Vb Control. MouseLeave probléma?

Sziasztok!

Egy kis problémába ütköztem. A dolog a következő: amikor az egeret "elviszem" az adott ablakról, akkor annak az Opacity-jét 60%-ra kéne állítania. Na ez nem akar működni. a MouseEnter event viszont működik. Itt a kód:

Private Sub mini_MouseLeave(sender As Object, e As EventArgs) Handles Me.MouseLeave

Me.Opacity = 60%

End Sub

Private Sub mini_MouseEnter(sender As Object, e As EventArgs) Handles Me.MouseEnter

Me.Opacity = 100%

End Sub

Ott a MouseEnter event ami működik és fölötte meg a MouseLeave event ami meg NEM akar működni.

A segítségeket előre is köszönöm :)