《多媒體軟件設(shè)計技術(shù)》課件第6章

6.1VB播放音頻的方法6.2MP3的播放方法6.3兩個實(shí)例本章小結(jié)練習(xí)六眾所周知，VB是功能非常強(qiáng)大的多媒體開發(fā)工具，它有著豐富的函數(shù)和方法，可處理各種各樣的多媒體信息，能夠很靈活地操作聲音等多媒體素材。在VB中用于輸出聲音的方法比較多，主要有以下四種。

6.1VB播放音頻的方法

1．利用Beep語句使揚(yáng)聲器發(fā)聲

在使用VB開發(fā)應(yīng)用程序時，根據(jù)應(yīng)用環(huán)境的需要，有時我們并不需要在應(yīng)用程序中大量地使用聲音，而只需在特定的場合出現(xiàn)聲音，如Windows的警告聲等。

Beep語句是VB提供的一條利用計算機(jī)揚(yáng)聲器發(fā)聲的語句，它雖然只能夠發(fā)出簡單的蜂鳴聲，但在應(yīng)用程序中卻大量用于輸出警告的信息。如下例中，允許用戶在文本框中輸入數(shù)字，當(dāng)用戶輸入錯誤時，系統(tǒng)會報警提示。

除了Beep語句外，在VB中調(diào)用Windows的一些有關(guān)發(fā)聲的API函數(shù)，也可以讓計算機(jī)的蜂鳴器發(fā)出不同頻率、時長的聲音，從而奏出美妙的音樂。其中最常用的有關(guān)發(fā)聲的API函數(shù)是Beep，其聲明格式如下：其中dwFreq為聲音頻率，dwDuration為發(fā)聲時間。在VB的通用過程中聲明上述函數(shù)后，就可以在程序中對它進(jìn)行調(diào)用。

2．利用OLE2.0控件播放音頻

VB是第一個支持對象連接與嵌入(OLE)的開發(fā)工具，利用OLE可以簡單地在應(yīng)用程序中插入聲音文件，這也是使用VB開發(fā)多媒體軟件常用的方法。從VB的工具箱中我們可以找到OLE?2.0控件。雙擊OLE?2.0控件時，會彈出“InsertObject”窗口，在窗口中選擇對象類型ObjectType為聲音文件，選擇“CreatefromFile”指定硬盤上聲音文件的位置，同時確認(rèn)Link方式。這些步驟其實(shí)是在設(shè)置OLE?2.0的屬性，我們通過打開屬性窗口，設(shè)置其中的Class、SourceDoc、SourceItem等屬性，也可完成這一工作。按F5鍵運(yùn)行程序，雙擊OLE對象時就會發(fā)聲。與播放各種聲音文件相關(guān)的屬性為Action，通過設(shè)置Action屬性可以打開、驅(qū)動、刪除相應(yīng)的聲音對象。在下面的例子中，運(yùn)行程序后便可調(diào)用聲音文件：

3．利用VB的多媒體控件MCI32播放音頻及MIDI音樂

使用MCI32是VB開發(fā)多媒體軟件的主要方法，利用MCI32在應(yīng)用程序中加入聲音文件是很容易的事。MCI32控件在工具箱里的名稱是MMControl，如果在工具箱里找不到它，則用添加控件的方法在部件中選中“MicrosoftMultimediaControl6.0”，就可以增加MMControl控件。

下面是利用MMControl控件設(shè)計播放WAV文件的程序。設(shè)計步驟如下：

(1)新建一個工程。

(2)在Form1上建立一個MMControl控制對象MMControl1(見圖6-1)。圖6-1在Form1上建立一個MMControl控制對象MMControl1

(3)設(shè)置MMControl1的屬性。在MMControl1控件上，通過單擊鼠標(biāo)右鍵，在彈出式菜單中選中屬性，就可出現(xiàn)MMControl1控件的屬性頁窗口。我們可以在該窗口的控件頁中設(shè)置MMControl1的屬性值，將倒帶、快進(jìn)、步進(jìn)、回倒、暫停、播放、錄音、停止按鈕設(shè)為可視(見圖6-2)，便會出現(xiàn)倒帶、快進(jìn)、步進(jìn)、回倒、暫停、播放、錄音、停止按鈕。圖6-2將部分按鈕設(shè)為可視(4)在Form_Load中編寫以下程序：為了正確管理多媒體資源，在退出應(yīng)用程序之前，應(yīng)該關(guān)閉那些已經(jīng)打開的MCI設(shè)備。如果將下面的語句放到Form_Unload過程，那么在退出包含MultimediaMCI控件的窗體之前，就可以關(guān)閉那些已經(jīng)打開的MCI設(shè)備。

程序說明：

(1)?MMControl1.DeviceTypeMCI是指定多媒體文件的類型，如：AVIVideo、CDAudio、DAT、DigitalVideo、MMMovie、Sequencer、VCR、WaveAudio等。

(2)?MMControl1.Filename是設(shè)定要播放WAV文件的路徑及文件名。

(3)?MMControl1.Command是MMControl的控制命令。以下是一些常用的控制命令：

(4)由于本程序利用MMControl的Button，因此只用到Open控制命令。

(5)程序執(zhí)行后，按Play按鈕就會播放語音，中途可按暫?；蛲Ｖ拱粹o。

(6)播放完畢后，要按倒帶按鈕才可以重新播放。

使用MCI32控件播放MIDI的方式與播放WAV的方式是一樣的。下面的程序可以用來播放MIDI音樂：

4．調(diào)用API函數(shù)播放WAV文件、MIDI音樂及CD音樂

API函數(shù)非常多，讀者可以用VB中的“API文本瀏覽器”查找所需的API函數(shù)，然后把它復(fù)制到自己的模塊程序中。

在調(diào)用API函數(shù)的時候，要分辨清楚16?bit和32?bit所用的動態(tài)鏈接庫(DLL)，不然會發(fā)生版本不對的錯誤(這個錯誤的錯誤碼為48)，從而造成程序無法執(zhí)行。為了避免發(fā)生這種錯誤，我們可以在定義函數(shù)的模塊程序中加入下列“前置判斷”：在Windows系統(tǒng)中，有關(guān)多媒體功能的動態(tài)鏈接庫中，16bit使用的是MMSystem.DLL，32bit使用的是WINMM.DLL。

sndPlaySound函數(shù)是播放WAV文件的API函數(shù)。下面給出sndPlaySound函數(shù)的定義及常數(shù)的定義。

函數(shù)的定義：

sndPlaySound函數(shù)需要兩個參數(shù)：第一個參數(shù)soundfilename是要播放的WAV文件的名稱；第二個參數(shù)是一個表明播放方式的標(biāo)識常量。經(jīng)常使用的標(biāo)識意義如下：

SND_SYNC：播放WAV文件，播放完畢后將控制轉(zhuǎn)移回應(yīng)用程序中。

SND_ASYNC：播放WAV文件，然后將控制立即轉(zhuǎn)移回應(yīng)用程序中，而不管對WAV文件的播放是否結(jié)束。

SND_NODEFAULT：不播放缺省的WAV文件，以免發(fā)生某些意外的錯誤。

SND_MEMORY：播放以前已經(jīng)加載到內(nèi)存中的WAV文件。

SND_LOOP：循環(huán)播放WAV文件。

SND_NOSTOP：在開始播放其它的WAV文件之前，需要完成對本W(wǎng)AV文件的播放。

注意：

(1)上面的函數(shù)定義及常數(shù)定義用在標(biāo)準(zhǔn)模塊程序中，也可用在程序窗體的通用聲明部分，這時應(yīng)將函數(shù)定義中的Public改成Private，將常數(shù)定義中的Public刪除。

(2)?SND_LOOP標(biāo)識通常需要同SND_ASYNC共同使用，即在兩個標(biāo)識之間添加“and”符號，以免在對WAV文件進(jìn)行播放的時候?qū)⑾到y(tǒng)掛起。

下面介紹使用API函數(shù)mciExecute播放MIDI音樂的方法。首先在程序窗體的通用聲明部分或標(biāo)準(zhǔn)模塊中添加如下聲明語句：

mciExecute函數(shù)只需要一個參數(shù)lpstrCommand，它是一個命令字符串，用于指明播放聲音文件的命令。例如，希望從頭到尾完整地播放CANYON.MID音樂文件，則該字符串就是“playC:\WINDOWS\MEDIA\CANYON.MID”，其中play為命令，C:\WINDOWS\MEDIA\CANYON.MID為音樂文件的路徑以及文件名稱，如下所示：

DimTempAsLong

Temp=mciExecute(“play

C:\WINDOWS\MEDIA\CANYON.MID")如果希望對聲音文件的某一部分進(jìn)行播放，則可以使用from..to..?播放區(qū)間子句來控制播放區(qū)間。例如，若要播放CANYON.MID文件的5～15秒的區(qū)間，則可以使用如下的語句：

mciExecute函數(shù)也可以用來對WAV文件進(jìn)行播放，方法同上。下面給出使用API函數(shù)sndPlaySound及mciExecute播放聲音的完整程序，程序界面如圖6-3所示。圖6-3使用API函數(shù)播放音樂控件設(shè)計

通過按下F5鍵來執(zhí)行樣例程序。如圖6-4所示，單擊“sndPlaySound播放”命令按鈕，則使用sndPlaySound函數(shù)來播放C:\WINDOWS\MEDIA目錄下的TADA.WAV聲音文件；單擊“mciExecute播放”命令按鈕，則使用mciExecute函數(shù)來播放C:\WINDOWS\MEDIA目錄下的CANYON.MID文件的5～15秒的部分。

下面我們結(jié)合實(shí)例介紹如何使用API多媒體函數(shù)mciSendString來播放CD音樂，如圖6-5所示。圖6-4單擊“sndPlaySound播放”按鈕，則使用sndPlaySound函數(shù)播放聲音文件圖6-5播放CD控件設(shè)計

程序運(yùn)行后，先插入CD光盤，然后單擊“播放CD第一首歌”命令按鈕，就可聽到該CD的第一首歌了。

總的說來，以上四種方法的復(fù)雜程度及對系統(tǒng)的要求和消耗的系統(tǒng)資源各有不同。因而，作為一個VB程序員，在編寫程序時應(yīng)能熟練而準(zhǔn)確地使用上述四種方法，并能在一定的場合選擇恰當(dāng)?shù)囊环N方法，從而為自己的程序增添效果。

MP3自問世以來，因其聲音還原好、壓縮比率高而深受歡迎，將MP3使用在多媒體應(yīng)用軟件中會大大減少存儲空間。那么，怎樣在自己的應(yīng)用程序中播放MP3文件呢？實(shí)際上，使用ActiveX控件mp3play.ocx(一個播放MP3文件的控件，可在網(wǎng)上下載)就可以在VB中很容易地實(shí)現(xiàn)MP3文件的播放。下面介紹該控件的使用方法。

(1)新建一個工程。單擊“工程”\“部件”菜單，在出現(xiàn)的控件對話框中選中“Dialog-MedieaMp3PlayActiveXControl”，將Mp3Play.ocx控件添加到VB的工具箱中。此時，在工具箱中可以看到新增加了一個藍(lán)色小喇叭圖標(biāo)，這就是mp3play.ocx控件。6.2MP3的播放方法

(2)單擊工具箱中的MP3控件，將其添加到窗體中，名稱設(shè)為MP3Play1，屬性Visible設(shè)為False。

(3)在窗體中添加“播放”命令按鈕，其名稱為command1，屬性Caption為“播放MP3”。在其Click事件中填寫以下代碼：

在窗體中添加“停止播放”命令按鈕，其名稱為command2，屬性Caption為“停止播放”。在其Click事件中填寫以下代碼：

程序執(zhí)行后，單擊“播放MP3”按鈕，將播放所指定的MP3音樂。若要停止，單擊“停止播放”按鈕即可。上面介紹了播放MP3文件的一個簡單例子。在這個例子中，我們使用了Mp3Play.ocx控件的三個最常用的方法Mp3Play1.Open、Mp3Play1.Play及Mp3Play1.Stop。下面進(jìn)一步介紹Mp3Play.ocx控件的常用方法和屬性。

Authorize(Name,Password)方法：輸入認(rèn)證的名字及密碼，否則，只能播放30秒。如果輸入正確，則返回0；否則返回5。調(diào)用方法如下：

ReturnValue=Mp3Play1.Authorize("Password","Keyword")

Open(Inputfile,Outputfile)方法：打開MP3聲音文件。如果僅僅是播放MP3，則Outputfile輸出文件應(yīng)為空(“”)；如果要輸出波形文件，則outputfile(輸出文件)應(yīng)為波形文件名。如果執(zhí)行成功，則返回0；否則返回錯號。調(diào)用方法如下：

ReturnValue=Mp3Play1.Open(“C:\Song.mp3”,“”)

或

ReturnValue=Mp3Play1.Open(“C:\Song.mp3”,“C:\Song.wav”)

Close方法：關(guān)閉MP3文件。

GetVolumeLeft,GetVolumeRight屬性：返回系統(tǒng)的音量大小，長整型(long0～65?536)。

GetVolumeLeftP,GetVolumeRightP屬性：返回系統(tǒng)音量的百分比(0～100)。

GetWaveLengthSecs屬性：返回聲音文件總的播放時間長度(秒)。

SetVolume方法：設(shè)置系統(tǒng)的左右音量值(long0～65?536)。調(diào)用方法如下：

ReturnValue=Mp3Play1.SetVolume(32768,32768)

Pause方法：暫停(一次暫停，二次播放)。

Play方法：播放。如果成功，則返回0。

PlayFromToS(SecondA,SecondB)方法：從開始SecondA播放聲音文件到SecondB。最大的SecondB可以從屬性GetWaveLengthSecs中得到。如果運(yùn)行成功，則返回0。

Stop方法：停止播放聲音文件和編碼(decoding)。如果執(zhí)行成功，則返回0。

只要我們靈活運(yùn)用如上所述的方法和屬性，就不難設(shè)計出屬于自己的“MP3播放程序”。下面給出一個完整的“MP3播放程序”，從程序中可以清楚地看到Mp3Play.ocx控件的方法和屬性的運(yùn)用情況。

窗體中各控件的布局如圖6-6所示。其中Mp3Play控件為MP3播放控件，Mp3Enc控件為MP3編碼控件。圖6-6窗體中各控件的布局

程序運(yùn)行后，單擊“打開”按鈕，選定要播放的Mp3文件，再單擊“播放”按鈕，就可以聽到美妙的Mp3音樂了(見圖6-7)。圖6-7Mp3Player6.3.1聲音點(diǎn)播機(jī)

在進(jìn)行多媒體應(yīng)用軟件的開發(fā)時，經(jīng)常會用到后綴名為?.MID和?.WAV的聲音和音樂文件。為了選擇這些聲音或音樂文件，一般是用Windows附件中的媒體播放器逐次地打開它們，操作起來十分繁瑣。下面的程序是一個“聲音點(diǎn)播機(jī)”，界面美觀，操作快捷高效，用鼠標(biāo)單擊文件名即可播放(見圖6-8)。6.3兩個實(shí)例圖6-8聲音點(diǎn)播機(jī)控件設(shè)計圖6-9聲音點(diǎn)播機(jī)的設(shè)計結(jié)果6.3.2播放資源文件中的WAV聲音

VB提供的方法可使我們很容易地使用資源文件中的字符、圖片等。我們可以用