【正文】 Microsoft Multimedia Control 2) 從工具箱中選擇 MMControl 2. 外觀 3. 作用 ：于管理媒體控制接口 (MCI)設備 ,包括常規(guī)的多媒體音頻、視頻設備。 也稱 Multimedia MCI控件。 MMControl 第九章 Visual Basic常用控件 57 4. 各按鈕的名稱及作用 Prev Next Play Pause Back Step Stop Record Eject 通過設置各按鈕的 Visible和 Enabled屬性可以有選擇地設置可用的按鈕。 第九章 Visual Basic常用控件 58 5. 屬性 1) DeviceType：指定要打開的 MCI設備的類型。 ? 簡單設備 ：不需要數(shù)據(jù)文件即可播放，如打開視頻或音頻 CD播放器，即可通過“曲目”進行播放、回繞和快進。 ? 復合設備 ：必需通過數(shù)據(jù)文件才能播放。 ? Multimedia MCI控件支持的部分多媒體設備：見 P187表 95 ? 例如， 使用 Multimedia MCI控件 MMControl1播放 avi文件，需要首先做以下設置： = AVIVideo 2) FileName：指定 Open命令將要打開的或者 Save命令將要保存的文件。例如： = d:\ 第九章 Visual Basic常用控件 59 3) Command：指定將要執(zhí)行的 MCI命令 例如，打開指定的 .avi文件并開始播放： = AVIVideo = d:\ = open = play 4) AutoEnable：決定 Multimedia MCI控件是否能夠自動啟動或關閉控件中的某個按鈕。僅在Enabled屬性被設置為 True的前提下才起作用。 5) ButtonEnabled：啟用或禁用控件中的某個按鈕。只有當 Enabled屬性為 True、 AutoEnable屬性為 False時起作用。具體使用時應將 Button替換成相應的按鈕名稱。 例如： = False 第九章 Visual Basic常用控件 60 6) ButtonVisible：決定指定的按鈕是否在控件中顯示。只有當 Visible屬性為 True時起作用。 例如： = False 7) Frames：指定 Step或 Back命令步進的幀數(shù)。 例如： = 10 8) TimeFormat：規(guī)定與位置信息相關的屬性所采用的時間格式（如“毫秒”），這些屬性包括：From、 Length、 Position、 Start、 To、TrackLength、 TrackPosition。 9) From：規(guī)定 Play或 Record命令的起始點。 10) To：規(guī)定 Play或 Record命令的結(jié)束點。 11) Length：返回打開的 MCI設備上的媒體長度。 12) Position：返回打開的 MCI設備的當前位置。 第九章 Visual Basic常用控件 61 13) Start：返回當前媒體的起始位置。 14) Tracks：返回當前所使用的設備的音軌數(shù)。對于 CD唱片， Tracks屬性指的是一張盤中共有多少個曲目。 15) Track：用于指定音軌。 16) TrackPosition：返回 Track屬性給出的音軌的起始位置。 17) TrackLength：返回 Track屬性給出的音軌的長度。 18) hWndDisplay：對于利用窗口顯示輸出結(jié)果的MCI MMMovie或 Overlay設備，該屬性用于為其規(guī)定顯示輸出的窗口。 第九章 Visual Basic常用控件 62 可以為該屬性指定一個是 MCI設備輸出窗口的句柄。窗體和控件的句柄可以通過其 hWnd屬性獲得。例如，指定輸出窗口為圖片框 Picture1： = 19) Notify：決定下一條 MCI命令是否使用 MCI通知服務。如果該屬性被設置為 True， 那么在下一條MCI命令完成時產(chǎn)生一個回調(diào)事件 (Done)。 賦給該屬性的值只對下一條 MCI命令有效。 20) Wait：決定是否要等到下一條 MCI命令完成，才能將控制權返回應用程序。賦給該屬性的值只對下一條 MCI命令有效。 21) UpdateInterval：規(guī)定兩次連續(xù)的 StatusUpdate事件之間的毫秒數(shù)。 第九章 Visual Basic常用控件 63 2． 事件 1) ButtonClick：當用戶單擊 MCI控件上的按鈕時產(chǎn)生該事件，其事件過程如下： Private Sub MMControl1_ButtonClick(Cancel As Integer) …… End Sub Button： Prev、 Next、 Play、 Pause、 Back、Step、 Stop、 Record或 Eject。 例如，以下為 Pause按鈕對應的事件過程： Private Sub MMControl1_PauseClick(Cancel As Integer) …… End Sub 第九章 Visual Basic常用控件 64 2) StatusUpdate事件：按 UpdateInterval屬性所給定的時間間隔自動地發(fā)生。應用程序可以在該事件過程中定期檢查當前 MCI設備的狀態(tài)。例如，從 Multimedia MCI控件的 Position、Length和 Mode等屬性中獲得狀態(tài)信息 3) Done事件：當 Notify屬性為 True的 MCI命令結(jié)束時發(fā)生。該事件過程返回一個參數(shù)NotifyCode， 用于表示 MCI命令是否成功，可以是以下任意設置值： 1—命令執(zhí)行成功。 2—命令被其他命令所替代。 4—命令被用戶中斷。 8—命令失敗。 第九章 Visual Basic常用控件 65 【例 913】 利用 Multimedia MCI控件在指定的圖片框中播放 .avi文件。 Picture1 MMControl1 運行界面： 第九章 Visual Basic常用控件 66 1) 在窗體的 Load事件過程中編寫如下代碼： Private Sub Form_Load() = AVIVideo = amp。 _ \ = False = False = open = End Sub 2) 在窗體的 Unload事件過程中執(zhí)行 Stop命令： Private Sub Form_Unload(Cancel As Integer) = stop End Sub 第九章 Visual Basic常用控件 67 本章小結(jié) ? Name屬性 ? Caption屬性 ? Enabled屬性 ? Visible屬性 ? Left、 Top、 Height、 Width屬性 ? BackColor、 ForeColor屬性 ? FontName、 FontSize、 FontBold、 FontItalic、 FontStrikethru、 FontUnderline屬性 ? Font對象屬性 ? MousePointer、 MouseIcon屬性 第九章 Visual Basic常用控件 68 2. 鼠標和鍵盤事件 ?鼠標事件 ?MouseDown、 MouseUp事件 ?MouseMove事件 ?鍵盤事件 ?KeyPress事件 ?KeyDown、 KeyUp事件 第九章 Visual Basic常用控件 69 3. 常用內(nèi)部控件 ? 框架（ Frame） ? 圖片框（ PictureBox） ? 圖像框（ Image） ? 選項按鈕（ OptionButton） ? 復選框（ CheckBox） ? 列表框（ ListBox） ? 組合框（ Combobox) ? 定時器 (Timer) ? 滾動條 (ScrollBar) 4. 動畫控件和多媒體控件 ? ActiveX控件的添加 ? 動畫控件 Animation ? 多媒體控件 Multimedia MCI