WindowsMediaPlayer1 не могу открыть файл mp4 - VB

Формулировка задачи:

Добрый день! Такой вопрос не могу открыть файл через код. Если в свойствах WMP указать полный путь файла вот так E:\1\..\..., все работает! Но если открывать файл через код ничего не происходит и кнопка старт неактивна.Файл у меня в папке с проектом. Вот код:

Private Sub WindowsMediaPlayer1_OpenStateChange(ByVal NewState As Long)
    WindowsMediaPlayer1.URL = App.Path & "\Тыж программист.mp4"
End Sub

Решение задачи: «WindowsMediaPlayer1 не могу открыть файл mp4»

textual
                            Листинг программы 
                        

                            Private Sub Form_Activate()
'WindowsMediaPlayer1.URL = "d:\сравнение планет.flv.mp4"
WindowsMediaPlayer1.URL = App.Path & "\Тыж программист.mp4"
End Sub
                        