日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
VB.NET播放WAV實(shí)現(xiàn)方法介紹

VB.NET編程語言可以說功能是非常強(qiáng)大的。而且其的應(yīng)用范圍也是很廣泛。比如對界面的操作,和對聲音的操作等等。我們今天將會了解到有關(guān)VB.NET播放WAV的相關(guān)應(yīng)用技巧,希望能給大家大帶來希望。

10年積累的成都網(wǎng)站制作、網(wǎng)站建設(shè)經(jīng)驗(yàn),可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你,你也不認(rèn)識我。但先網(wǎng)站制作后付款的網(wǎng)站建設(shè)流程,更有營山免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。

Wednesday, September 24 2003 1:24 PM 當(dāng)一定事件完成時,程序發(fā)出特定的信號則可以增加程序的用戶界面特性,比如在下載完成或者選擇一個命令的時候。使用一個多媒體功能,通過一個vb程序來運(yùn)行WAV文件是一件輕而易舉的事情。然而,系統(tǒng)必須為這一操作而安裝一個聲卡。

你所需要的API函數(shù)稱為PlaySound,以下為該函數(shù)的聲明:

 
 
 
  1. Public Declare Function
     PlaySound Lib "winmm.dll" _  
  2. Alias "PlaySoundA" 
    (ByVallpszName As String, _  
  3. ByValhModule As Long, 
    ByValdwFlags As Long) _  
  4. As Long  

在這一函數(shù)中,第一個變量是名稱,包括運(yùn)行的Wave文件的路徑。第二個變量在運(yùn)行文件時通常不使用,所以你可以將它賦值為zero。最后一個變量包含控制函數(shù)如何工作的標(biāo)記。

為了當(dāng)前的需要,必須需要兩個標(biāo)記。它們是:

SND_ASYNC (value= 1):以異步方式運(yùn)行,這意味著當(dāng)播放聲音時函數(shù)在運(yùn)行。

SND_FILENAME (value = &H20000):第一個變量為一個文件名。

所以,以下VB.NET播放WAV代碼播放了DingDong.wav文件中的聲音:

 
 
 
  1. PlaySound "dingdong.
    wav", CLng(0), _  
  2. SND_ASYNC Or SND_FILENAME  

當(dāng)運(yùn)行在一個程序中運(yùn)行音頻文件時,還有其他兩點(diǎn)值得注意。第一,你必須確保一個特定的音頻文件存在,否則會產(chǎn)生錯誤。這一過程可以用以下一個簡單的函數(shù)來完成:

 
 
 
  1. Public Function FileExists
    (FullFileName) As Boolean  
  2. '' Passed a filename 
    (with path) returns  
  3. '' True if the file 
    exists, False if not.  
  4. Dim s  
  5. s = dir(FullFileName)  
  6. If s = "" Then  
  7. FileExists = False 
  8. Else  
  9. FileExists = True 
  10. End If  
  11. End Function  

第二,VB.NET播放WAV程序必須具有為用戶提供關(guān)閉聲音的選擇設(shè)置。這一過程可以通過使用一個比如gProgramSoundsEnabled的全局布爾變量來實(shí)現(xiàn)。

我的方法是在一個函數(shù)中同時處理這些需要,如下所示。(以下代碼假設(shè)音頻文件已經(jīng)存放在程序文件中)

 
 
 
  1. Private Sub PlaySoundX
    (filename As String)  
  2. '' If sound is enabled 
    and filename exists,  
  3. '' play the specified sound.  
  4. filename = App.path & 
    "" & filename  
  5. If FileExists(filename) 
    And gProgramSoundsEnabled Then  
  6. PlaySound filename, CLng(0), 
    SND_ASYNC Or SND_FILENAME  
  7. End If  
  8. End Sub  

正確使用這些函數(shù),程序就可以播放任何Wave文件,如下所示:

 
 
 
  1. PlaySoundX "DingDong.wav"  

VB.NET播放WAV的其他方法包括窗體上的多媒體控制。當(dāng)你不需要這些控制特性時,以上講述的技術(shù)已經(jīng)足夠,并且很容易掌握。

【編輯推薦】

  1. VB.NET嵌入文件操作技巧分享
  2. 深入分析VB.NET FieldOffset特性
  3. VB.NET資源文件應(yīng)用經(jīng)驗(yàn)總結(jié)
  4. VB.NET Dllimport特性內(nèi)容概述
  5. 簡單實(shí)現(xiàn)VB.NET打開Notes數(shù)據(jù)庫

文章題目:VB.NET播放WAV實(shí)現(xiàn)方法介紹
網(wǎng)站URL:http://m.5511xx.com/article/dpddepe.html