|
Kdyby jste nevěděl ,tak malá inpirace.Doporučuji ,ale to skusit sám.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.Filter = "WMV File (*.wmv)|*.wmv|Avi File (*.avi)|*.avi"
OpenFileDialog1.InitialDirectory = "C:\"
OpenFileDialog1.FileName = ""
OpenFileDialog1.Title = "Otevrit soubor"
OpenFileDialog1.Multiselect = False
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
End If
End Sub
|