vb.net中如何控制MP3播放

先定義api函數(shù)

從網(wǎng)站建設(shè)到定制行業(yè)解決方案，為提供成都網(wǎng)站建設(shè)、網(wǎng)站建設(shè)服務(wù)體系，各種行業(yè)企業(yè)客戶提供網(wǎng)站建設(shè)解決方案，助力業(yè)務(wù)快速發(fā)展。創(chuàng)新互聯(lián)將不斷加快創(chuàng)新步伐，提供優(yōu)質(zhì)的建站服務(wù)。

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrRetumString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Private Sub mnu_Music_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnu_Music.Click

mciSendString("open c:\1.mp3 alias mp3", Nothing, 0, IntPtr.Zero)

mciSendString("Play mp3", Nothing, 0, IntPtr.Zero)

End Sub

上面2行代碼就可以播放了，測(cè)試通過(guò)。

就是沒(méi)有其它功能，自己加上吧，

如：關(guān)閉 mciSendString("close mp3",Nothing,0,intPtr.Zero)

等等

vb.net中如何播放聲音，是要什么控件嘛？

My.Computer.Audio.Play("SoundFile.wav")

SoundFile.wav是你要播放的聲音文件的路徑

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

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

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í)窗體無(wú)法控制，效果相當(dāng)于Enabled=true，但音頻播放完畢后就沒(méi)事了）

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的可見(jiàn)為False）

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

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)移動(dòng)到某控件上發(fā)出聲音的話改一下觸發(fā)事件就OK了。