16,555
社区成员
发帖
与我相关
我的任务
分享
Private Sub frm_linq_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseClick
Dim s As Region = New Region(Me.Panel1.RectangleToScreen(Me.Panel1.DisplayRectangle))
If Me.Panel1.Visible = True AndAlso Not s.IsVisible(e.Location) Then
Me.Panel1.Visible = False
End If
End Sub