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

本文目錄一覽：

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

vb程序中怎么添加背景音樂?

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

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

Visual Basic是第一個支持對象連接與嵌入（OLE）的開發(fā)工具，利用OLE可以簡單的在應(yīng)用程序中插入聲音文件。這也是使用Visual Basic開發(fā)多媒體軟件常用的方法。使用過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中插入背景音樂

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

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

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

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

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

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

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

簡單?。∈褂胢ciExecute 語句！！例如 mciExecute play & App.Path + mp3程序和音樂在同一文件夾里，mp3是音樂文件，也可以是其他的音樂格式。

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