我正在尝试将VLC合并到我的VB程序中。我已包括COM工具VLCActiveXPlugin_V2。在“ openfiledialog1”属性中,“ InitialDirectory”设置为“ E:\ Movies \”,这是我的.mp4电影的存储位置。当我运行程序并按btnLoad时,openfiledialog1将打开E:\ Movies,但显示“没有与您的搜索匹配的项目”!该代码改编自.net教程,对他而言效果很好。我在“假设”中是使用较旧版本的VB和/或.NET编写的。
有人有什么主意吗?
这只是一个尝试使播放正常工作的测试,最终产品是用户可以创建可用电影的DataGridView列表,选择其中一部电影,并“希望”程序将播放该电影。
代码:
公共类表格1
Private Sub btnLoad_Click(sender As Object, e As EventArgs) Handles
btnLoad.Click
OpenFileDialog1.Filter = " (*.mp4) | .mp4 "
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
AxVLCPlugin21.playlist.add(OpenFileDialog1.FileName)
End If
End Sub
Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles
btnStart.Click
AxVLCPlugin21.playlist.play()
End Sub
Private Sub btnStop_Click(sender As Object, e As EventArgs) Handles
btnStop.Click
AxVLCPlugin21.playlist.stop()
End Sub
Private Sub btnPause_Click(sender As Object, e As EventArgs) Handles
btnPause.Click
AxVLCPlugin21.playlist.togglePause()
End Sub
结束班级