Hi,
So aplly control Windows Media Player or API function mciSendstring, but WMP is better.

EXAMPLE
---------
'Insert in form control WindowsMedia

Private Sub Form_Load()
wmp.uiMode = "none"
wmp.URL = FileName
wmp.Controls.play
End Sub

Private Sub Form_Resize()
wmp.Width = Me.Width
wmp.Height = Me.Height
End Sub