VB.NET双控制。 MouseHover不一次执行两个操作。和飞行工具栏不在形状

Question

我使用两种形式。一个作为主要形式，另一个作为on Fly toolbar (Windows 7 style)。 我的第一个问题是： 我设置了Mouserhover来完成两项任务    A.显示Form2    B设置Opacity = 1 这是代码：

Private Sub form1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseHover

    form2.RightToLeftLayout = Me.RightToLeftLayout
    form2.Show()
    Me.Opacity = 1
End Sub

它显示表单2，但不透明度是默认值，即在Form Load事件中设置的0.8 *）似乎控件传递给form2。 我想要实现的第二件事是， 将form2放在表单1的顶部。