vb.net 中 如何實(shí)現(xiàn) 播放mp3文件

在.NET里，沒有托管的音樂播放器，用API只能播放WAV格式，對于MP3等形式的音頻文件，就要依賴于其他控件了，常用的就是

致力于企業(yè)形象建設(shè)和產(chǎn)品！多年來，創(chuàng)新互聯(lián)不忘初心，以建立行業(yè)服務(wù)標(biāo)桿為目標(biāo)，不斷提升技術(shù)設(shè)計(jì)服務(wù)水平，幫助客戶在互聯(lián)網(wǎng)推廣自己的產(chǎn)品、服務(wù)，為客戶創(chuàng)造價(jià)值從而實(shí)現(xiàn)自身價(jià)值！中小型企業(yè)如何做品牌網(wǎng)站制作？初創(chuàng)業(yè)公司建站預(yù)算不足？

MediaPlayer。使用方法：

在工具箱上點(diǎn)右鍵，選擇“選擇項(xiàng)目(Choose

Items)”，切到COM選項(xiàng)卡，找到

Windows

Media

Player，

勾選，確定

在t工具箱上，把剛才加入的MediaPlayer控件，拖放到窗體上

代碼：

WindowsMediaPlayer1.URL

=

"mp3文件路徑，支持網(wǎng)絡(luò)路徑"

WindowsMediaPlayer1.Ctlcontrols.play

基本就OK了，至于其他的操作諸如下一曲上一曲暫停停止，直接看

WindowsMediaPlayer1.Ctlcontrols.

里面的方法吧。

VB.net如何加載音效？

方法一：調(diào)用系統(tǒng)DLL（這個(gè)有點(diǎn)不完善，也就是播放聲音時(shí)窗體無法控制，效果相當(dāng)于Enabled=true，但音頻播放完畢后就沒事了）

Private?Declare?Function?sndPlaySound?Lib?"Winmm.dll"?Alias?"sndPlaySoundA"?(ByVal?lpszSoundName?As?String,?ByVal?uFlags?As?Long)?As?Long

Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click

Dim?SoundFile?As?String,?Result?As?Long

SoundFile?=?"D:\KuGou\Pianoboy?-?第105天.wav"?'此處為路徑

Result?=?sndPlaySound(SoundFile,?0)

End?Sub

方法二：使用WindowsMediaPlayer（WindowsMediaPlayer1的可見為False）

先添加一個(gè)windowsmediaplayer控件（工具箱里沒有，需要手動添加）

Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click

WindowsMediaPlayer1.visible=False

Me.WindowsMediaPlayer1.URL?=?"D:\KuGou\Pianoboy?-?第105天.mp3"

End?Sub

上面的都是點(diǎn)擊button1（按鈕1）后播放聲音，若是鼠標(biāo)移動到某控件上發(fā)出聲音的話改一下觸發(fā)事件就OK了。

vb.net 控件添加聲音

建一個(gè)窗體，里面添加一個(gè)按鈕，代碼里拷入下面的代碼，運(yùn)行后，單擊按鈕

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Private Const SND_ASYNC = H1 '異步播放

Private Const SND_SYNC = H0 '同步播放 （缺省）

Private Sub Command1_Click()

Dim SoundFile As String, Result As Long

SoundFile = "c:\Windows\Media\chord.wav"

Result = sndPlaySound(SoundFile, SND_ASYNC)

End Sub

說明：

要播放不同的聲音，例如0-9，你找到相應(yīng)的wav文件，編程實(shí)現(xiàn)就可以了。

PS:沒注意到你是VB.NET,上面的代碼是VB6的，生成工程文件，直接用.NET打開并自動轉(zhuǎn)換，也可以使用。

分享題目：vb.net放聲音,vbs發(fā)出聲音
標(biāo)題路徑：http://chinadenli.net/article24/dsicije.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供靜態(tài)網(wǎng)站、全網(wǎng)營銷推廣、電子商務(wù)、網(wǎng)站設(shè)計(jì)、搜索引擎優(yōu)化、微信小程序

廣告

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