我在Visual Studio 2013中使用VB创建了一个简单的媒体播放器。我的要求是:只需按一个按钮,我就需要播放固定路径下可用的视频文件(使用我修复的OpenFileDialog
路径)。例如。按下名为“A”的按钮应播放“C:/播放列表”
如何做到这一点?如果需要,我可以分享我当前的代码。我是VB的新手。
代码:
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
With OpenFileDialog1
.Filter = "MPEG-4|*.mp4"
.ShowDialog()
TextBox1.Text = .FileName
End With
AxWindowsMediaPlayer1.URL = (OpenFileDialog1.FileName)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
AxWindowsMediaPlayer1.Ctlcontrols.play()
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
AxWindowsMediaPlayer1.Ctlcontrols.pause()
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
AxWindowsMediaPlayer1.Ctlcontrols.stop()
End Sub
Private Sub TrackBar1_Scroll(sender As Object, e As EventArgs) Handles TrackBar1.Scroll
AxWindowsMediaPlayer1.settings.volume = TrackBar1.Value
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
AxWindowsMediaPlayer1.settings.volume = 20
End Sub
End Class
我需要一个名为A,B,C等的按钮,比如播放,暂停,我已经拥有。按下按钮A应该从'C:\ Playlist'中播放'file_A.mp3'
答案 0 :(得分:0)
AxWindowsMediaPlayer1.URL = "C:\Playlist\file_A.mp3"
AxWindowsMediaPlayer1.Ctlcontrols.play()