主题：[求助]控件显示隐藏问题

窗口MouseEnter全局事件（其他类同）

If left(e.Sender.name,6) = "Button"
    Dim Panel1 As WinForm.Panel = e.Form.Controls("Panel1")
    Panel1.Visible = True
    Panel1.Top = e.Sender.Top
End If