windows media player...

[A.H.H]

Hola estoy utilizando windows media player en un form, para reproducir un video, lo que quiero saber es como se hace para que cuando termine el video se cierre el form.

puse esto que encontre en la red pero no me funciona:

Private Sub WindowsMediaPlayer1_StatusChange()
If WindowsMediaPlayer1.Status = "Stopped" Then
Unload Me
End If
End Sub

tambien esto pero tampoco me funciona:

Private Sub Form_Activate()
if windowsmediaplayer1.status <> "playing" then
unload me
end if
End Sub

un apunte les dire que el video lo arranco maximizado no se si tendra algo que ver o no importa.
espero me ayuden gracias

[A.H.H]

Hola de nuevo, probando probando encontre la respuesta que buscaba, lo pongo por si le interesa alguno:

Esto si funciona para cerrar la ventana cuando se acaba de reproducir algo

Private Sub WindowsMediaPlayer1_StatusChange()
If WindowsMediaPlayer1.playState = wmppsStopped Then
Unload Me
End If

Salu2