Hola muchachos tengo problema con esta simple funcion , pk la verdad no se q pasa, en windoes 8 funciona parfectamente, pero en windows xp, siempre me tira como la ventana encontrada, aún asi este cerrada

 

Public Class Form1
 
    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
 (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim strCaption As String, lhWnd As Long
 
        'Exact caption of the window:
        strCaption = "Log In"
        lhWnd = FindWindow(#32770, strCaption)
 
        'if the result is 0, window was not found:
        If lhWnd = 0 Then
            MsgBox("Could not find  ...")
        Else
            MsgBox("  found: " & lhWnd)
        End If
    End Sub
End Class

EL tipo class de la ventana es la coreccta m tambien eh probado con vbnullstring pero nada

La ventana es una sub ventana de un proceso, es decir
abres el programa, luego le das a un BOTTON llamado  log in, y te activa otra ventana, esa es la que quiero interceptar "llamada Log In"  como dije en win xp no funciona la funcion iF siempre me vota como valor encontrada,