Transcript 多媒體
Visual Basic 6.0 學習範本
錄音程式
功能表列
波紋顯示區
指位器
從頭搜尋
搜尋到結尾處
項目
功能表列
位置
長度
波紋顯示區
指位器
從頭搜尋鈕
搜尋到結尾處鈕
播放鈕
停止鈕
錄音鈕
播放
停止
錄音
說明
有檔案、編輯、效果以及說明四類功能。
顯示目前播放的聲音位置。
顯示目前所播放聲音的總長度。
顯示播放的聲音波紋。
用來顯示或調整目前聲音的播放位置。
將指位器移回最開頭。
將指位器移到最結尾。
開始播放聲音。
停止播放聲音。
開始使用麥克風來錄製聲音。
錄放音
一般錄放音機
Windows 2000的錄音機程式
將麥克風插入麥克風插座。
將麥克風插入音效卡上的麥克風插座。
按下 錄音 鍵
(有些要同時按下放音 鍵)。
按
對著麥克風講話。
對著麥克風講話。
按下 停止 鍵停止錄音。
按
一般錄放音機
鈕。
鈕停止錄音。
Windows 2000的錄音機程式
按 倒轉 鍵,倒帶至最開頭處。
按
鈕,倒帶至最開頭處。
按 放音 鍵,開始放音。
按
鈕,開始放音。
按 停止 鍵停止放音,或者等到
放音完畢後也會自動停止。
按
鈕,停止放音,或者等到所有的
聲音都播放完畢後,也會自動停止。
存檔
聲音製錄完畢後,可以執行功能表的 [檔案/存檔]
指令,開啟「另存新檔」對話方塊,將所錄製的聲
音儲存成 *.wav檔 。
讀檔放音
若要播放先前存好檔的.WAV聲音檔,您可以執行
功能表的 [檔案(F)/開啟舊檔(O)] 指令,在開啟對話
方塊中選取你所要的檔案,然後按
鈕,再
按
放音鈕即可。
產生聲音特效
「錄音程式」可以針對所錄製的聲音進行多種的特效
處理,可以先錄製或載入 *.wav檔,然後使用「錄音
程式」的 [效果] 功能表中所提供的特效功能進行特
效處理。
編輯聲音
項目
複製(C)
貼上插入(P)
貼上混合(X)
插入檔案(I)
與檔案混合(M)
刪除目前位置之前的資料(B)
刪除目前位置之後的資料(A)
音效內容(U)
說明
將聲音資料複製到剪貼簿中。
在目前位置插入剪貼簿中的聲音資料。
與剪貼簿中的聲音進行混音。
在目前位置插入其它的聲音檔案。
將目前的聲音與其它聲音檔案進行混合。
將目前位置之前的聲音資料刪除。
將目前位置之後的聲音資料刪除。
設定音效裝置及音效資料的取樣方式。
【範例】分段錄製錄製 “歡迎光臨全OK商場” 聲
音。
1. 開啟「錄音程式」。
2. 連接好麥克風,按下
(錄音) 鈕開始錄音。
3. 對著麥克風講 "歡迎光臨"。
4. 按
(停止) 鈕結束錄音。
5. 移動指位器來觀看所錄製聲音的波紋,應該可以看到
4個明顯起狀的波紋。
6. 移動指位器,指到最開始有明顯起伏波紋的起點。
7. 執行 [編輯/刪除目前位置之前的資料] 指令,將錄音
前的雜音去除。
8. 移動指位器,指到最結尾有明顯起伏波紋的尾部。
9. 執行 [編輯/刪除目前位置之後的資料] 指令,將 “
歡迎 光臨" 這句話之後的雜音去除。
10. 將所錄製的 "歡迎光臨" 聲音存成A:\welcome.wav檔。
11. 執行 [檔案/開新檔案] 指令。
12. 執行步驟3~9,錄製 “全OK商場” 這句話,並處理掉頭
尾
的雜音部份。
13. 按
(從頭搜尋) 鈕,倒帶到最開頭。
14. 執行 [編輯/插入檔案] 指令,將之前儲存的A:\welcome.wav
聲音檔 (“歡迎光臨”),加到目前所錄製的聲音 (“全OK商
場”) 前面,將前兩次分段錄製的聲音連接起來。
15. 按
(播放) 鈕,就可以聽到 “歡迎光臨全OK商場”的
聲
音,最後再將組合後的聲音存檔即可。
16. 按
(播放) 鈕,聽到 "歡迎光臨全OK商場" 的聲音。
17. 執行 [檔案/存檔] 指令,將檔案存為"A:\allok.wav"。
媒體播放程式
在Windows 98中除了可以使用「CD播放程式」和
「錄音機」來播放CD唱片和*.wav音效檔之外,
更可以使用「媒體播放程式」來播放為數眾多的
多媒體檔案,例如*.wav聲音檔、*.avi影像檔、
*.mid音樂檔、CD唱片…等等,除了播放之外,還
可以自行選定部份或全部的多媒體檔案資料 (例如
CD歌曲、*.wav音效…等等),複製到WordPad、
Word…等等支援物件連結功能的應用軟體文件中,
這樣就可以在這些文件中插入多媒體資料,而且
可以直接播放。
啟動媒體播放程式
執行 [開始/程式集/附屬應用程式/視聽娛樂/媒體播放程
式] 指令,開啟「媒體播放程式」對話方塊:
捲動鈕
指位器
播放
停退 前倒快下
止帶 一帶速個
個 前標
標 進示
示
開
始
選
擇
結
束
選
擇
圖示
說明
指位器:指示目前播放的位置,也可以拖曳到想要播放的位置
捲動鈕:可以用來左右移動指位器 (以秒為單位)。
開始播放。
停止播放。
打開或關閉光碟機托盤。
前一個標示:倒帶至上一個標示的位置,例如檔案的開頭或是
CD唱片中一首歌的開頭。
倒帶:指位器移至最前面。
快速前進:快轉。
下個標示:快轉至下一個標示的位置,例如檔案的結尾或是CD
唱片中一首歌的結束位置。
開始選擇:設定選取的起點。
結束選擇:設定選取的終點。
選取要播放的多媒體檔案類型
多媒體類型
說明
ActiveMovie
*.au、*.dat、*.mpg…等等格式的多
媒體檔案。
Video for Windows
*.avi格式的Windows動畫檔。
聲音
*.wav格式的聲音檔。
Microsoft MCI
Sequencer
CD音效
MIDI
*.mid、*.rmi格式的音樂檔。
播放CD唱片。
播放多媒體檔案
步驟一、選取要播放的多媒體檔案
選取檔案的方式有二:
1. 執行 [檔案/開啟舊檔] 指令,會出現「開啟」對
話方塊,在「檔案類型」下拉式清單中選取要播
放的多媒體檔案類型,然後載入要播放的檔案。
2. 直接在 [裝置] 功能表中選取您要播放的裝置,如
果是選擇「CD音效」,電腦就會自動執行「CD
播放程式」來播放CD唱片,如果是選取其它多媒
體類型,就會出現「開啟」對話方塊,就可以載
入所要播放的多媒體檔案。
步驟二、播放所載入的多媒體檔案
載入多媒體檔案之後,按
的多媒體檔案。
就可以開始播放所載入
OLE 技術
OLE:軟體程式互相支援與應用。
使用小作家、WordPad、Word等文書處理軟體時,
在文件中插入圖片,也是OLE的應用,在播入的圖片
上快按兩下滑鼠左鍵,Windows會開啟小畫家來編輯
該圖片,這個過程就稱作“嵌入”(Embedding)。
連結(Linking):會使嵌入後的物件資料隨被嵌入端
的 資 料 更 動 而 更 動 , 例 如 在 Word 文
件 中 嵌 入 並 連 結 一 個 Excel 長 條 圖 ,
若 是 在 Excel 中 更 改 了 用 來 繪 製 長 條
圖 的 相 關 資 料 數 值 , 則 Word 中 嵌 入
的長條圖物件會跟著更新重繪。
OLE 控制項的建立
項
OLE
具
OLE
收
納
器
工
收
納
器
控
制
如果你是要在程式中動態的載入物件檔案,那麼就
可以在「插入物件」對話方塊中按
鈕,
先不插入任何物件檔案,稍後再由程式中藉由設定
OLE控制項屬性來將物件插入OLE控制項中。
OLE 控制項常用屬性
屬 性
說
明
AutoActivate
決定OLE物件啟動的方式。
0. 由程式碼控制
1. 取得駐點時啟動
2. 滑鼠連擊兩次時啟動 (預設值)
3. 自行判斷
SizeMode
決定OLE控制項 (顯示區域) 大小的方式。
0. 裁剪,也就是以設計階段所定的大小為準,不論
OLE物件的大小為何,都不改變。
1. 自動延伸。物件的大小會自動延伸至OLE控制項被
填滿。
2. 自動調整。OLE控制項會自動調整到剛好可以顯示
物件的大小。
3. 比例調整。物件會儘可能地延伸其大小至OLE控制
項被填滿。
SourceDoc
用來取得所嵌入物件的路徑與檔名。
OLE 控制項常用方法
方
法
功
能
CreateEmbed 嵌入一個物件。
例:olePlayer.CreateEmbed “C:\AVI\DEMO.AVI”
DoVerb
開啟物件進行動作,例如播放、編輯。
Close
關閉物件。例如停止播放、結束編輯。
【範例】不用寫程式就可以播放音樂檔(*.mid)與影片
檔(*.avi)。
1 . 本 範 例 所 使 用 到 的 音 樂 檔 ( mcitest.mid)、 聲 音 檔
( rabbit.wav) 與 影 片 檔 ( mcitest.avi) 都 在 書 附 光 碟 片
\VB15目錄中。
2. 本範例建立三個OLE收納器控制項,以及分別設定
其SourceDoc屬性值即可。
3. 程式執行後,在OLE控制項上快按兩下滑鼠左鍵,
或按滑鼠右鍵後,選取「播放」選項即可播放。
影片檔
mcitest.avi
音樂檔
mcitest.mid
聲音檔
rabbit.wav
API 播放語音函式
Step 1
中做如
宣告API函數:在表單或模組的General
下的宣告:
Private Declare Function sndPlaySound Lib "winmm.dll"
Alias "sndPlaySoundA" (ByVal SoundName As String,
ByVal Flags As Long) As Long
Step 2
在 程 式 中 呼 叫 sndPlaySound 函 數 來 播 放
*.wav檔。
語法:ret=sndPlaySound("檔名.WAV", flags)
功能:以flags參數指定方式播放語音檔
ret代表呼叫SndPlaySound函數的傳回值,其值為0表失敗;為
1 表成功。(一般可以忽略傳回值,直接將 sndPlaySound當成一
個 Sub 副程式,使用下列方法來呼叫即可:
Call sndSoundPlay(“檔名.WAV”, n) 或
sndSoundPlay "檔名.WAV", n
flags參數可以指定播放方式:
Flags參數值
播放方式
0
將語音檔播放完畢後,程式才繼續執行。
1
一邊播放語音檔,一邊執行程式。
2
所指定的語音檔不存在時,不播放Windows預設的警告聲音。
如果如不設定的話,就會在找不到所指定的語音檔時,播放
Windows警告聲音。
4
播放SoundName字串內容所存放的語音資料,因此我們可以
預先將語音檔載入至字串變數中,並在需要播放時,使用
Flags=4來播放字串變數內的語音資料,這樣可以避免讀取語
音檔時會延遲程式的進行。
8
循環播放語音檔,必須在Flags也設定為1時才有效。
16
如果正在播放所指定的語音檔,則返回函式呼叫處。