VB6 利用FindWidows查找窗口句柄！

在後台按鍵 或是 對窗口做某些動作時 很長需要用到 句柄( hwnd )
接下來就用最簡單的 「FindWindows查找窗口句柄！」

'宣告API
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Sub Command1_Click()

    Dim Hwnd As Long

    Hwnd = FindWindow(vbNullString, "窗口名稱")

    MsgBox Hwnd

End Sub

開源專案: 點我下載