VB.NET怎樣播放視頻

首先要確定播放的視頻格式是什么格式，如果是windows media player支持的格式，直接使用該控件就行了，如果是單個(gè)視頻的話，比如命名為myPlayer,則：

從事中國(guó)電信成都樞紐中心，服務(wù)器租用，云主機(jī)，網(wǎng)頁(yè)空間，國(guó)際域名空間，CDN，網(wǎng)絡(luò)代維等服務(wù)。

myPlayer.url="視頻文件完整路徑"

vb.net中的mediaplay控件播放視頻有圖像無聲音

　1． Beep

最簡(jiǎn)單的一種方法，通過計(jì)算機(jī)的揚(yáng)聲器發(fā)出聲響， 聲響的音高與持續(xù)時(shí)間取決于硬件和系統(tǒng)軟件，從而隨計(jì)算機(jī)不同而不同。

Beepg跟Msgbox等方法位于Microsoft.VisualBasic.Interaction 中，一般默認(rèn)系統(tǒng)會(huì)自動(dòng)加載。調(diào)用很簡(jiǎn)單，看下面的例子。

Dim I As Integer

For I = 1 To 100 ' Loop 100 times.

Beep() ' Sound a tone.

Next I

2． 用Win32 API PlaySound

PlaySound位于"winmm.dll"中，可以根據(jù)輸入?yún)?shù)的不同，播放WAV類型的音樂。在VB.NET中調(diào)用跟VB6中差不多：

先聲明：

Private Declare Auto Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer

Const SND_FILENAME As Integer = H20000

Const SND_ALIAS As Integer = H10000

Const SND_SYNC As Integer = H0

具體還有很多常量，不一一列舉，下面是播放一個(gè)wav文件的例子

Dim mstrfileName As String = "c:\eagle2.wav"

PlaySound(mstrfileName, 0, SND_FILENAME)

注意上面的播放是非同步的，就是說它并不會(huì)播放完畢才結(jié)束。如果把上面的代碼寫在一個(gè)Button.Click的事件處理程序中，第二次點(diǎn)擊的時(shí)候它會(huì)打斷第一次的播放，重新開始。

當(dāng)然我們也可以調(diào)用系統(tǒng)的聲音：

PlaySound("SystemStart", 0, SND_ALIAS Or SND_SYNC)

' 以同步的方式調(diào)用系統(tǒng)啟動(dòng)時(shí)候的聲音。

3． 調(diào)用媒體播放器控件

VB.NET中并沒有提供媒體播放器的.NET組件，沒辦法我們還是調(diào)用以前Com組件Windows Media Player。當(dāng)然除了聲音外，還可以播放視頻文件。

首先把媒體播放器控件加到工具欄中，調(diào)用還是簡(jiǎn)單的寫一下吧：）

Private Sub playMediaFile(ByVal mediaFileName As String)

With MediaPlayer1

.Stop()

.FileName = "c:\mp3\愛不愛我.mp3"

.Play()

End With

End Sub

vb.net中怎么調(diào)用DirectX來播放視頻

使用Microsoft.DirectX.AudioVideoPlayback組件。

首先，需要安裝DirectX SDK.

DirectX 9.0c Redistributable

DirectX 9.0 SDK Update

然后將對(duì)Microsoft.DirectX.AudioVideoPlayback.dll的引用添加到你的項(xiàng)目。

使用這段代碼在Panel控件上放置一個(gè)視頻文件：

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控件也能播放視頻。

右擊工具箱-選項(xiàng)- COM組件-定位并添加“Windows Media Player” ActiveX控件

然后“Windows Media Player”控件將會(huì)出現(xiàn)在工具箱上。將它拖動(dòng)到窗體上來生產(chǎn)一個(gè)AxWindowsMediaPlayer1對(duì)象,并為URL屬性指定音頻或者視頻文件。

AxWindowsMediaPlayer1.URL = "D:\VideoOrAudio.wmv"

Media Player控件默認(rèn)將會(huì)自動(dòng)播放文件。

如何用vb.net造一個(gè)視頻播放器啊？求高手指教

獨(dú)立開發(fā)一個(gè)全新的播放器應(yīng)該很難，如果內(nèi)嵌一個(gè)其他的應(yīng)該還不算難，自己網(wǎng)上搜搜，應(yīng)該有類似的demo

VB.NET 視頻播放器

Windows Media Player 我使用很正常啊，外面單獨(dú)使用也正常

而且視頻播放正不正常其實(shí)是調(diào)用視頻的解碼模塊來實(shí)現(xiàn)的，跟程序本身關(guān)系不大

建議你下載“終極解碼FinalCodecs”安裝后重新嘗試Windows Media Player控件

vb.net2005調(diào)用Windows media player,打包之后視頻無法播放

1\確保視頻已經(jīng)拷貝到 C:\platform\video\ 目錄下

2\把 debug 目錄下的其他DLL文件也一起打包過去

網(wǎng)站欄目：vb.net視頻播放代碼的簡(jiǎn)單介紹
鏈接URL：http://sd-ha.com/article22/hhesjc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站建設(shè)、標(biāo)簽優(yōu)化、軟件開發(fā)、云服務(wù)器、網(wǎng)站排名、定制開發(fā)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)