原计划是想设计一个包含控件的窗体，透明度为60%，当鼠标移到窗体时透明度变为1，离开时再变成60%，但当鼠标移动到控件（比如按钮）上时，Form1的透明度就变成60%，怎样才能做到即使鼠标在控件上，Form1的透明度也保持60%不变？
这是代码：
Private Sub Form1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseLeave
Me.Opacity = 1
End Sub
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
Me.Opacity = 0.6
End Sub

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Me.Opacity = 0.6
For Each s As Control In Me.Controls
AddHandler s.MouseMove, AddressOf Form1_MouseMove
Next
End Sub
Private Sub Form1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseLeave
Me.Opacity = 0.6
End Sub
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
Me.Opacity = 1
End Sub


高手！万分感谢。



高手指教，加精必然~~