如何在vb.net中獲得窗體活動狀態的值

Question

我到處尋找並找不到答案。如果表單處於活動狀態或非活動狀態，如何獲得布爾值。

僞：

'If the form is active 
'Do this 
'else If the form is not active 
'Do this 

謝謝

Answer 1

這是我用到底：

Private formActive As Boolean 

Private Sub form1_Activated(sender As Object, e As EventArgs) Handles MyBase.Activated 
formActive = True 
End Sub 

Private Sub mainForm_Deactivate(sender As Object, e As EventArgs) Handles MyBase.Deactivate 
formActive = False 
End Sub 

然後：

If formActive = True 
'If the form is active 
else 
'If the form is not active 
End If 

Answer 2

這個怎麼樣？它使用Form類的ActiveForm property：

If Form.ActiveForm.Name = "yourForm" Then 
     'Do Events 1 
    Else 
     'Do Events 2 
    End If 

Answer 3

使用此，它獲取活動窗口的hWnd，然後把它比作形式的hWnd。

Public Declare Function GetActiveWindow Lib "user32"() As System.IntPtr 
If GetActiveWindow() = Me.Handle Then 
    lblIsActive.Text = "active" 
Else 
    lblIsActive.Text = "not active" 
End If