高分：如何在VB中实现播放AVI的视频文件？

Question

谢谢大家 ：）

Answer 1

Play AVI Videos without an OCX:
http://www.freevbcode.com/ShowCode.asp?ID=4801

Answer 2

微软标准答案：How to Use Visual Basic to Play an AVI File:http://support.microsoft.com/?kbid=213471

Answer 3

引用DirectX比较简单或用mediaplay控件,RealPlayr控件等

Answer 4

用WindowsMediaPlayer不就可以吗,学习楼上的

Answer 5

Multimedia MCI控件Private Sub Form_Load()
  with MMControl1
    .Notify=False 
    .Wait=True 
    .Shareable=False 
    .DeviceType="AVIVideo"
  end with
End Sub'选择播放文件的路径
Private Sub cmdOpen_Click() 
  CommonDialog1.CancelError=True 
  On Error GoTo Errhandler: 
  CommonDialog1.Flags=cdlOFNFileMustExist 
  CommonDialog1.Filter="Video(*.AVI)|*.AVI" 
  CommonDialog1.ShowOpen 
  MMControl1.FileName= CommonDialog1.FileName 
  MMControl1.Command="Open"
  Errhandler: 
  `如果单击了Cancel按钮，那么退出该事件过程
End Sub'播放
Private Sub cmdPlay_Click() 
  MMControl1.Command="Play"
End Sub

Answer 6

谢谢阿忠，我想问一下，那如何用Multimedia MCI控件实现满屏播放呢？

Answer 7

设置属性Full screen=true，就好了啊。

Answer 8

我的网站上有：http://j2soft.008.net/VB资料－>查询“媒体播放”。