建站
咨詢
售后
建站咨詢
新聞中心
VB.NET編程語言可以說功能是非常強(qiáng)大的。而且其的應(yīng)用范圍也是很廣泛。比如對(duì)界面的操作，和對(duì)聲音的操作等等。我們今天將會(huì)了解到有關(guān)VB.NET播放WAV的相關(guān)應(yīng)用技巧，希望能給大家大帶來希望。
10年積累的成都網(wǎng)站制作、網(wǎng)站建設(shè)經(jīng)驗(yàn)，可以快速應(yīng)對(duì)客戶對(duì)網(wǎng)站的新想法和需求。提供各種問題對(duì)應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識(shí)你，你也不認(rèn)識(shí)我。但先網(wǎng)站制作后付款的網(wǎng)站建設(shè)流程，更有營山免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。
Wednesday, September 24 2003 1:24 PM 當(dāng)一定事件完成時(shí)，程序發(fā)出特定的信號(hào)則可以增加程序的用戶界面特性，比如在下載完成或者選擇一個(gè)命令的時(shí)候。使用一個(gè)多媒體功能，通過一個(gè)vb程序來運(yùn)行WAV文件是一件輕而易舉的事情。然而，系統(tǒng)必須為這一操作而安裝一個(gè)聲卡。
你所需要的API函數(shù)稱為PlaySound，以下為該函數(shù)的聲明：
- Public Declare Function
PlaySound Lib "winmm.dll" _- Alias "PlaySoundA"
(ByVallpszName As String, _- ByValhModule As Long,
ByValdwFlags As Long) _- As Long
在這一函數(shù)中，第一個(gè)變量是名稱，包括運(yùn)行的Wave文件的路徑。第二個(gè)變量在運(yùn)行文件時(shí)通常不使用，所以你可以將它賦值為zero。最后一個(gè)變量包含控制函數(shù)如何工作的標(biāo)記。
為了當(dāng)前的需要，必須需要兩個(gè)標(biāo)記。它們是：
SND_ASYNC (value= 1)：以異步方式運(yùn)行，這意味著當(dāng)播放聲音時(shí)函數(shù)在運(yùn)行。
SND_FILENAME (value = &H20000):第一個(gè)變量為一個(gè)文件名。
所以，以下VB.NET播放WAV代碼播放了DingDong.wav文件中的聲音：
- PlaySound "dingdong.
wav", CLng(0), _- SND_ASYNC Or SND_FILENAME
當(dāng)運(yùn)行在一個(gè)程序中運(yùn)行音頻文件時(shí)，還有其他兩點(diǎn)值得注意。第一，你必須確保一個(gè)特定的音頻文件存在，否則會(huì)產(chǎn)生錯(cuò)誤。這一過程可以用以下一個(gè)簡單的函數(shù)來完成：
- Public Function FileExists
(FullFileName) As Boolean- '' Passed a filename
(with path) returns- '' True if the file
exists, False if not.- Dim s
- s = dir(FullFileName)
- If s = "" Then
- FileExists = False
- Else
- FileExists = True
- End If
- End Function
第二，VB.NET播放WAV程序必須具有為用戶提供關(guān)閉聲音的選擇設(shè)置。這一過程可以通過使用一個(gè)比如gProgramSoundsEnabled的全局布爾變量來實(shí)現(xiàn)。
我的方法是在一個(gè)函數(shù)中同時(shí)處理這些需要，如下所示。(以下代碼假設(shè)音頻文件已經(jīng)存放在程序文件中)
- Private Sub PlaySoundX
(filename As String)- '' If sound is enabled
and filename exists,- '' play the specified sound.
- filename = App.path &
"" & filename- If FileExists(filename)
And gProgramSoundsEnabled Then- PlaySound filename, CLng(0),
SND_ASYNC Or SND_FILENAME- End If
- End Sub
正確使用這些函數(shù)，程序就可以播放任何Wave文件，如下所示：
- PlaySoundX "DingDong.wav"
VB.NET播放WAV的其他方法包括窗體上的多媒體控制。當(dāng)你不需要這些控制特性時(shí)，以上講述的技術(shù)已經(jīng)足夠，并且很容易掌握。
【編輯推薦】
- VB.NET嵌入文件操作技巧分享
- 深入分析VB.NET FieldOffset特性
- VB.NET資源文件應(yīng)用經(jīng)驗(yàn)總結(jié)
- VB.NET Dllimport特性內(nèi)容概述
- 簡單實(shí)現(xiàn)VB.NET打開Notes數(shù)據(jù)庫
網(wǎng)頁標(biāo)題：VB.NET播放WAV實(shí)現(xiàn)方法介紹
網(wǎng)頁路徑：http://www.dlmjj.cn/article/dpddepe.html
