Visual Basic - Problemas con ShowWindow

Hola!

Quiero q utilizando dos botones, uno haga q me desaparezca una ventana de un programa y q con otro boton, esa ventana vuelva a aparecer. Para ello utilizo el API ShowWindow, pasandole el handle q antes consigo mediante FindWindow.

La cosa es q ShowWindow (MihWnd, SW_HIDE) me funciona bien, es decir, la ventana me desaparece, pero luego ejecuto ShowWindow (MihWnd, SW_RESTORE) y no vuelve a aparecer la ventana. He probado cambiando SW_RESTORE por SW_SHOW, SW_SHOWMAXIMIZED... con varios, pero con ninguno vuelve a aparecer. No se pq puede ser. Ademas he comprobado y el handle q me da en las dos busquedas es el mismo y todo.

Alguien sabe q puede ser lo q me falla? Meto el codigo de los botones abajo.

Muchas gracias

Private Sub Command2_Click()
MihWnd = FindWindow("WinTV_32", "WinTV32")
Call ShowWindow(MihWnd, SW_HIDE)
End Sub

Private Sub Command3_Click()
MihWnd = FindWindow("WinTV_32", "WinTV32")
Call ShowWindow(MihWnd, SW_RESTORE)
End Sub

talvez el handle es diferente.
¿que te retorna la funcion? deberia ser 0

Quisas te sirva esto claro no uso API pero sifunciona:

form1.show 'muestra el formulario

form1.hide 'oculta el formulario

el form1puedes cambiar por el formulario q quieras.avisame se te sirve

Respondiendo a MVB, el handle es el mismo, ya lo he comprobado. Tiene que ser otra cosa.

Y a Eduardo, la cosa es q lo que quiero ocultar y enseñar no es un formulario, es la ventana de otra aplicacion que ejecuto a traves de mi codigo.

Gracias x responderme a los dos, y si sabeis alguna solucion decidmela, por favor

estas tratando de ocultar y mostrar la ventana que viene con el programa de la tarjeta capturadora de WinTV o es otra ventana que se llama igual.

Es el programa de la tarjeta, si.

lastimosamente ahora no puedo ayudarte porque no tengo acceso a mi computadora, la tendre en algunos dias mas. yo tengo ese programa WinTV2000 y esa tarjeta PCI.
pero creo que esa tarjeta da un control activex para poder manejar la tarjeta PCI y quizas tambien para manejar el programa pero no estoy seguro.

probe tu codigo y a mi me funciona perfectamente, lo use con WinTV2000.
lo declare asi:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpszClassName As String, ByVal lpszWindow As String) As Long

Private Declare Function ShowWindow Lib "user32" _
(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Private Const SW_HIDE = 0
Private Const SW_RESTORE = 9