vb.net中怎么调用DirectX来播放视频

Question

调用Microsoft.DirectX.AudioVideoPlayBack.dll
我的代码:
Dim videoFile As Video = New Video("C:\localvideo.mp4")
videoFile.Owner = Panel1
videoFile.Play()

Answer 1

使用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控件默认将会自动播放文件。