189 8069 5689
首先要确定播放的视频格式是什么格式，如果是windows media player支持的格式，直接使用该控件就行了，如果是单个视频的话，比如命名为myPlayer,则：
成都创新互联是一家专注于成都网站设计、成都网站建设、外贸网站建设与策划设计,丰满网站建设哪家好?成都创新互联做网站,专注于网站建设10余年,网设计领域的专业建站公司;建站业务涵盖:丰满等地区。丰满做网站价格咨询:13518219792
myPlayer.url="视频文件完整路径"
使用Microsoft.DirectX.AudioVideoPlayback组件。
首先，需要安装DirectX SDK.
DirectX 9.0c Redistributable
DirectX 9.0 SDK Update
然后将对Microsoft.DirectX.AudioVideoPlayback.dll的引用添加到你的项目。
使用这段代码在Panel控件上放置一个视频文件：
ImportsMicrosoft.DirectX.AudioVideoPlayback
Public Class Form1
Private Sub Form1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs) Handles MyBase.Load
Dim videoFile As Audio =New Audio("D:\Video1.avi")
videoFile.Owner = Panel1
videoFile.Play()
EndSub
EndClass
'以前收集的资料，没用过,你自己整整
2)使用Windows Media Player控件也能播放视频。
右击工具箱-选项- COM组件-定位并添加“Windows Media Player” ActiveX控件
然后“Windows Media Player”控件将会出现在工具箱上。将它拖动到窗体上来生产一个AxWindowsMediaPlayer1对象,并为URL属性指定音频或者视频文件。
AxWindowsMediaPlayer1.URL = "D:\VideoOrAudio.wmv"
Media Player控件默认将会自动播放文件。
Windows Media Player 我使用很正常啊，外面单独使用也正常
而且视频播放正不正常其实是调用视频的解码模块来实现的，跟程序本身关系不大
建议你下载“终极解码FinalCodecs”安装后重新尝试Windows Media Player控件
关键在于“播放结束”事情的捕捉，播完后捕捉到该事件，然后就可以播下一个了。
VB不会，但原理就那样了，自己上CSDN上搜搜例子，祝你好运。
两个思路， 第一。自己管理列表，=，通过播放器状态， 用一个timer ， 自己管理列表，比如 播放器 停止了， 就 再给播放器一个文件地址 ， 进行下一个视频的播放，同时切换选择状态
第二。通过文件信息获得播放器当前文件， 然后切换选择状态， 当需要切换文件就通过更改当前列表的 index 来实现， 这需要列表文件的里同时存储相应的index 或者用有一次遍历一次列表
“工具箱”中单击右键，选择“选择项”菜单，打开“选择工具箱项”窗口，选择“COM组件”标签，在列表中找到并勾选“Windows Media Player”组件，单击“确定”按钮。将该组件添加到指定的工具箱选项卡中，然后在工具箱里面找 Windows Media Player 控件，拉到form里面，拉出来的控件就是AxWindowsMediaPlayer