VB 循环查找指定标题的活动窗口是否打开，VB 循环查找指定标题的窗口是否打开，VB 循环查找指定标题窗口是否打开，VB 循环查找指定的窗口是否打开，VB 查找指定标题的活动窗口是否打开，VB 查找指定标题活动窗口是否打开，VB 查找指定标题的窗口是否打开，VB 查找指定标题窗口是否打开，VB 查找指定标题窗口，VB 查找指定标题的活动窗口，VB 查找指定标题活动窗口，VB 查找指定标题的窗口，VB 查找指定活动窗口，VB 查找指定窗口，VB 查找窗口，VB FindWindow。

VB 循环查找指定标题的窗口是否打开：

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub Timer1_Timer()
    Dim hwnd As Long
    hwnd = FindWindow(vbNullString, "传奇加载")                                 '抓取这个窗口名称.
    If hwnd <> 0 Then MsgBox "打开了"
End Sub