[VB6] Riproduttore di Filmati .avi

[Snivel]

ciao a tutti raga mi sto cimentado nella realizzazione di un riprodutore di filmati molto scarno.
L'interfaccia e' la seguente:
Menu file con sotto menu apri ed esci
picturbox per visualizzare il filmato
controllo MMControl per la gestione del filmato e Controllo CommonDialog per caricare i filmati.

Il codice invece e' il seguente:

Private Sub mnuFileItem_Click(Index As Integer)
If Index = 0 Then
dlgVideo.Filter = "Filter (*.avi)|*.avi|"
dlgVideo.ShowOpen
mciVideo.FileName = dlgVideo.FileName
mciVideo.Command = "Open"
mciVideo.hWndDisplay = picVideo.hWnd
Else
End
End If
End Sub

Il problema e' che i film nn si vedono!!!
Manca qualcosa? Dove ho sbagliato? aiutatemi voi pls