本篇文章給大家談?wù)剉b程序設(shè)計(jì)插入音樂(lè)，以及vba實(shí)現(xiàn)音樂(lè)播放對(duì)應(yīng)的知識(shí)點(diǎn)，希望對(duì)各位有所幫助，不要忘了收藏本站喔。

本文目錄一覽：

• 1、vb程序中怎么添加背景音樂(lè)?
• 2、VB中插入背景音樂(lè)
• 3、如何在vb中插入背景音樂(lè)且在其他電腦中可放?

vb程序中怎么添加背景音樂(lè)?

使用資源文件，可以直接在在exe文件中播放聲音文件（wav文件），使程序顯得更加專(zhuān)業(yè)。

接下來(lái)把下面的代碼粘貼到你想播放聲音文件的地方，比如放在命令按鈕的Click事件中 Dim sFlags As Long sFlags = SND_ASYNC Or SND_NODEFAULT sndPlaySound FileName.Wav， sFlags 把上面的FileName.Wav換成你想要播放的聲音文件的完整路徑及文件名就行了。

Visual Basic是第一個(gè)支持對(duì)象連接與嵌入（OLE）的開(kāi)發(fā)工具，利用OLE可以簡(jiǎn)單的在應(yīng)用程序中插入聲音文件。這也是使用Visual Basic開(kāi)發(fā)多媒體軟件常用的方法。使用過(guò)VB的讀者都知道，VB的ToolBox中就有OLE0控件。

Private Declare Function sndPlaySound Lib winmm.dllAlias sndPlaySoundA（ByVal lpszSoundName As String，ByVal uFlags As Long）As Long Const SND_SYNC = &H0 播 放Wav文件，播放完畢后將控制轉(zhuǎn)移回你的應(yīng)用程序中。

VB中插入背景音樂(lè)

使用資源文件，可以直接在在EXE文件中播放聲音文件（Wav文件），使程序顯得更加專(zhuān)業(yè)。

把音樂(lè)mp3文件和exe文件放在同一個(gè)目錄下，假設(shè)是mp3，加入如下代碼設(shè)置音樂(lè)文件路徑：WindowsMediaPlayerURL = App.Path & mp3即可解決問(wèn)題，不過(guò)音樂(lè)文件要和exe在一起。如果要做到只有exe文件還可以使用資源文件的方式，程序運(yùn)行的時(shí)候釋放資源。

在窗中激活事件中加入以下代碼：Private Sub Form_Activate（）Dim ReturnValue As Long ReturnValue = sndPlaySound（C：windowsMEDIATADA.Wav，SND_SYNC）End Sub 通過(guò)（F5）鍵來(lái)運(yùn)行該程度即可聽(tīng)到背景音樂(lè)。

工具欄－》外接程序－》外接程序管理器－》加載 VB資源管理器 2。點(diǎn)擊工具欄上的VB資源管理器 3。

如何在vb中插入背景音樂(lè)且在其他電腦中可放?

一般就用MCI控件或者M(jìn)CI的API實(shí)現(xiàn)。

什么格式的音樂(lè)？若是wav的話(huà)那么選擇就多了，可以實(shí)現(xiàn)的API函數(shù)也較多 比如：sndPlaySound playsound之類(lèi) 或者添加MMControl控件（或者WMplayer也可以）這些方法都可以播放聲音文件，適當(dāng)決定播放方式什么的就自己去看一下吧，會(huì)學(xué)到很多東西的。注：MP3的話(huà)用WindowsMediaPlayer就很好，雖然有點(diǎn)大題小做了。

簡(jiǎn)單??！使用mciExecute 語(yǔ)句！！例如 mciExecute play & App.Path + mp3程序和音樂(lè)在同一文件夾里，mp3是音樂(lè)文件，也可以是其他的音樂(lè)格式。

vb程序設(shè)計(jì)插入音樂(lè)的介紹就聊到這里吧，感謝你花時(shí)間閱讀本站內(nèi)容，更多關(guān)于vba實(shí)現(xiàn)音樂(lè)播放、vb程序設(shè)計(jì)插入音樂(lè)的信息別忘了在本站進(jìn)行查找喔。