Visual Basic第18章 多媒體應(yīng)用程序

1、第十八章 用Visual Basic開發(fā)多媒體運用程序18.1 Visual Basic的多媒體控件一、多媒體控件的引入 在“工程菜單中單擊“部件菜單項，或用鼠標(biāo)右鍵單擊工具箱面板并從彈出的菜單中單擊“部件菜單項添加它們。然后從“部件對話框中選中Microsoft Multimedia Control 6.0，將它添加到工具箱中。 二、 多媒體控件簡介 多媒體控件管理媒體控制接口(MCI)設(shè)備上多媒體文件的記錄與回放。這種控件就是一組按鈕，它被用來向諸如聲卡、MIDI序列發(fā)生器、CD-ROM驅(qū)動器、視頻CD播放器和視頻磁帶記錄器及播放器等設(shè)備發(fā)出MCI命令。MCI控件還支持Windows(*.

2、avi)視頻文件的回放。多媒體控件的常用命令、常用屬性及事件 命 令描 述Back 將設(shè)備的軌道后退一步Close 關(guān)閉一個設(shè)備Eject 從光驅(qū)中退出光盤Next 到下一個軌道的起點Open 打開一個設(shè)備Pause 暫停播放或暫停后重新開始Play 播放一個文件Record 對一個設(shè)備進(jìn)行記錄Save儲存一份打開的文件Seek尋找位置(位置由To屬性給出)Sound播音Step前進(jìn)一步Stop停止播放或記錄Prev回到當(dāng)前軌跡的起點。在使用Prev命令三秒鐘之內(nèi)再次使用，會回到前一個軌道的起點。屬 性功 能AutoEnable根據(jù)設(shè)備性能自動啟用或禁用多媒體控件界面按鈕，它有True、Fal

3、se兩個屬性值，為True能自動播放媒體文件Command向媒體設(shè)備發(fā)出各種命令DeviceType設(shè)置將要使用的多媒體設(shè)備類型Frames確定來自一個設(shè)備的幀數(shù)FileName確定一些多媒體設(shè)備使用的文件名From確定下一條Play或Record命令的起點位置HwndDisplay設(shè)置一個多媒體設(shè)備使用的窗口Position取回設(shè)備播放或記錄的當(dāng)前位置Start取回一條Play或Record命令的當(dāng)前位置TimeFormat設(shè)置各種媒體設(shè)備使用的時間格式To確定下一條Play或Record命令的終點位置Tracks用于顯示總的軌跡數(shù)量UpdateInterval指定StatusUpdate事

4、件之間間隔的毫秒數(shù)Track在播放CD格式文件中，指定 Track和Track Position屬性返回信息的軌跡事件StatusUpdate: 播放時每隔UpdateInterval觸發(fā)PlayClick,OpenClick,StopClick第十九章 ActiveX 部 件ActiveX部件是可以反復(fù)運用的編程代碼和數(shù)據(jù)由用ActiveX技術(shù)創(chuàng)建的一個或多個對象所組成。在VB中，ActiveX部件有三類：ActiveX控件、ActiveX文檔(DLL/EXE)和ActiveX代碼庫(DLL/ EXE) 創(chuàng)建ActiveX部件可以采用多種編程工具，如VC+、VB、BCB、JAVA等這些創(chuàng)建的

5、ActiveX部件也可以在VB、VC+、BCB等開發(fā)工具中運用 Vb的三種ActiveX部件ActiveX控件是一種可視的ActiveX部件，是一種可以插入到Web頁或任何ActiveX控件容器中的交互對象。ActiveX文檔的引入允許Web閱讀器顯示其他格式的資料，例如PDF格式、Microsoft Office文檔、Visio圖形和圖表等，創(chuàng)建交互式的Internet運用程序。ActiveX DLL和ActiveX EXE是代碼部件，提供了對象庫。在程序設(shè)計時，經(jīng)過援用其他運用程序?qū)ο髱?，可以擴(kuò)展運用程序的功能。 19.1 ActiveX控件的制造建立一個ActiveX控件工程，然后在Us

6、erControl對象上設(shè)計ActiveX控件的界面。 (2) 編寫程序代碼。(3) 控件調(diào)試。(4) 生成且發(fā)布OCX控件。例:建立鐘表控件19.2 運用其他運用程序中的對象 很多運用程序都向外部提供了規(guī)模龐大的對象庫，這些對象可以在各運用程序之間共享 Vb程序可以經(jīng)過ActiveX部件技術(shù)訪問這些對象庫中的對象及其屬性、方法和事件，從而設(shè)計出功能強(qiáng)大的程序。 運用外部運用程序中的對象的步驟如下：(1) 設(shè)置對象庫的援用。 創(chuàng)建新的對象，或者從其他運用程序中獲得已存在的對象。(2) 運用這些對象的屬性、方法和事件來實現(xiàn)某種功能。(3) 釋放這些外部變量。例：援用word對象顯示藝術(shù)字第二十章

7、 Visual Basic網(wǎng)絡(luò)編程一、Windows Socket網(wǎng)絡(luò)通訊簡介TCP/IP協(xié)議是一組完好的網(wǎng)絡(luò)協(xié)議，有效地實現(xiàn)了不同網(wǎng)絡(luò)及計算機(jī)間的互操作 包括TCP、UDP、IP、ICMP、ARP/RARP等協(xié)議，它們共同作用，完成TCP/IP網(wǎng)絡(luò)環(huán)境下的數(shù)據(jù)傳輸、文件訪問、資源共享 TCP傳輸控制協(xié)議是個面向銜接的協(xié)議，可以將它同系統(tǒng)相比，在開場數(shù)據(jù)傳輸之前，用戶必需先建立與遠(yuǎn)程計算機(jī)的銜接，銜接后兩臺計算機(jī)就可彼此進(jìn)展數(shù)據(jù)傳輸。UDP用戶數(shù)據(jù)報協(xié)議是一個無銜接協(xié)議，通訊主機(jī)之間的數(shù)據(jù)傳輸類似于傳送郵件,通訊的兩臺計算機(jī)之間沒有明確的銜接。2. 地址 網(wǎng)絡(luò)通訊中通訊雙方分別位于不同的機(jī)器上

8、，這時要用“地址來標(biāo)識通訊的兩臺主機(jī)，在TCP/IP協(xié)議中采用32位二進(jìn)制數(shù)表示的IP地址，如。3. 端口 端口用于表示通訊的進(jìn)程。運用程序經(jīng)過系統(tǒng)調(diào)用與某端口建立銜接后，網(wǎng)絡(luò)傳輸層傳給該端口的數(shù)據(jù)都被相應(yīng)進(jìn)程所接納，相應(yīng)進(jìn)程發(fā)給傳輸層的數(shù)據(jù)都經(jīng)過該端口輸出。每個端口都擁有一個稱為端口號的整數(shù)型標(biāo)識符，用于區(qū)別不同端口 .其中11023范圍內(nèi)的端口號通常保管給系統(tǒng)進(jìn)程運用，用戶運用程序中可以運用的端口號范圍是102465535 . 如ie的端口號為80，ftp的端口號為21二、Windows Sockets編程原理 1. Socket套接字Socket套接字是網(wǎng)絡(luò)通訊的根本構(gòu)件。它的用途是將根

9、底網(wǎng)絡(luò)籠統(tǒng)出來，這樣，他不用對網(wǎng)絡(luò)協(xié)議非常了解，運用程序可在任何支持套接字的網(wǎng)絡(luò)上運轉(zhuǎn)。Windows Sockets規(guī)范定義了程序員可以運用，并且網(wǎng)絡(luò)軟件供應(yīng)商可以實現(xiàn)的一套庫函數(shù)調(diào)用和相關(guān)語法。Winsock就是Windows運用程序與TCP/IP之間的通訊界面，這個界面提供了訪問TCP和UDP網(wǎng)絡(luò)效力的方便途徑 運用程序1運用程序2網(wǎng)絡(luò)運用編程界面(Socket)TCP/IP中心協(xié)議物理介質(zhì)圖20.1.1 TCP/IP協(xié)議簇中心與運用程序關(guān)系圖 三、采用Winsock控件實現(xiàn)網(wǎng)絡(luò)通訊 1.Winsock控件 參與到工具箱：部件-microsoft winsock control 6.0屬

10、 性數(shù)據(jù)類型用 途BytesReceived Long返回本次連接中接收到的字節(jié)數(shù)LocalHostNameString本地主機(jī)名LocalIPString本地主機(jī)的IP地址LocalPortLong設(shè)置/返回這次連接所用的本地主機(jī)端口號ProtocolInteger設(shè)置/返回協(xié)議：SckTCPProtocol(0)TCP協(xié)議SckUDPProtocol(1)UDP協(xié)議RemoteHostString設(shè)置/返回跟本機(jī)連接的遠(yuǎn)程計算機(jī)名RemoteIPString設(shè)置/返回本機(jī)連接的遠(yuǎn)程計算機(jī)IP地址RemotePortLong設(shè)置/返回跟本機(jī)連接的遠(yuǎn)程計算機(jī)的端口號Socket HandleL

11、ong套接字的句柄StateInteger本次連接的狀態(tài)，用枚舉類型來表示。Winsock控件的屬性方 法用 途AcceptSub Accept(requestID As Long) 響應(yīng)其他計算機(jī)的連接請求CloseSub Close( ) 關(guān)閉當(dāng)前連接 ConnectSub Connect(RemoteHost,RemotePort) 連接到一臺遠(yuǎn)程計算機(jī)GetdataSub GetData(data,type,maxLen 從遠(yuǎn)程計算機(jī)接收數(shù)據(jù)PeekDataSub PeekData(data,type,maxLen) 從接收緩沖區(qū)中取數(shù)據(jù)但不把緩沖區(qū)中的數(shù)據(jù)刪除ListenSub Listen( ) 偵聽是否有連接請求SendDataSub SendData(data) 發(fā)送數(shù)據(jù)到遠(yuǎn)程計算機(jī)Winsock控件的方法事 件用 途Close調(diào)用Close方法時觸發(fā)ConnectionRequest接收到連接請求時觸發(fā)Connect連接完成后觸發(fā)DataArrival數(shù)據(jù)到達(dá)時觸發(fā)SendComplete發(fā)送數(shù)據(jù)完成后觸發(fā)SendProgress發(fā)送數(shù)據(jù)量變化時觸發(fā)Error出錯時觸發(fā)Winsock控件的事件四、采用TCP協(xié)議的Winsock通訊 效