面向对象程序设计实用教程--Visual Basic可视化编程 教学课件 作者 杨光宏 第7章.pptVIP

第七章 多媒体 本章学习目标 应知： 多媒体的类型 应会： 使用多媒体控件 使用动画（Animation）控件 项目1 制作播放音乐的程序 VisualBasic 6.0支持大量的多媒体，利用它提供的多媒体控件（MMControl），可以管理媒体控制接口（MCI）设备上的多媒体文件的录制和播放，这个控件可用命令来控制下列设备：声卡、MIDI序列发生器、CD-ROM驱动器、视频播放器等。下面我们就来学习怎样使用多媒体控件（MMControl）来播放声音文件（.wav、.mid、.mp3）、CD音乐和视频文件（.avi）等。 任务1 使用MMControl控件播放声音及CD音乐 多媒体控件（MMControl）提供了一组执行MCI命令的按钮。这些按钮命令与通常的CD机或录像机上的命令和功能十分相似 单击菜单“工程”“部件”（或直接按快捷键Ctrl+T），打开部件对话框，在控件列表中找到“Microsoft Multimedia Control 6.0”，选中该列表项左部的复选框 添加多媒体控件到窗体 双击工具箱中的多媒体控件图标 添加代码 任务2 使用MMControl控件播放CD音乐 代码： 任务3 使用MMControl控件播放视频 在窗体上添加一个多媒体控件MMControl1，一个通用对话框控件CommonDialog1 一个命令按钮和一个图片框控件Picture1 项目2 制作播放动画的程序 VisualBasic 6.0 提供的动画控件—Animation，能够播放不含声音的avi文件。在播放动画时，动画控件生成单独的执行线程，程序可以继续完成其它任务，即播放动画与执行其他代码能同时进行。 任务1 利用Animation控件播放无声动画 菜单“工程”“部件” ，打开部件对话框，在控件列表中选择“Microsoft Windows Common Controls-2 6.0” 双击工具箱中的动画控件图标 在窗体上就会添加一个动画控件Animation1。 任务2 使用ShockWaveFlash 控件播放Flash动画 单击菜单“工程”“部件”，打开部件对话框，在控件列表框中找到“ShockWave Flash”，选中该列表项左部的复选框 双击工具箱中的ShockWaveFlash图标 小结 这一章我们学习了如何利用多媒体控件管理各种媒体控制接口（MCI）设备，其中包括声卡、MIDI发生器、CD-ROM驱动器、音频播放器、视频播放器、视盘播放器等。也举例说明如何使用多媒体控件MMControl来编写播放声音文件、音乐CD、avi视频文件及VCD、DVD视频文件等。 一般来说，当应用程序需要执行耗时较长的操作时，应用程序应给用户一个明确的提示，说明应用程序正在运行，而不是死机了。此时动画控件Animation就是开发人员的一个良好选择。在这一章的最后还介绍了如何使用ShockWaveFlash 控件来播放Flash动画文件。 思考与练习题 构造一个简单的个人多媒体播放机，用来播放声音、CD音乐、avi视频文件以及VCD、DVD数字文件等。 使用ListBox给7.1.1 的声音播放器添加播放列表的功能。 * * 面向对象程序设计实用教程 — Visual Basic 可视化编程 Private Sub Command1_Click() 设置打开文件的类型 CommonDialog1.Filter = wav波形文件|*.wav|midi文件|*.mid|mp3音乐|*.mp3 CommonDialog1.ShowOpen 弹出打开文件对话框 If CommonDialog1.FileName = Then Exit Sub 当用户单击打开文件对话框上的 取消按钮时退出本过程 MMControl1.Command = Close 关闭前一个打开的对象（若存在的话） 指定打开的文件为要播放的对象 MMControl1.FileName = CommonDialog1.FileName MMControl1.Wait = True 阻止其它程序使用打开的多媒体设备 MMControl1.Command = Open 打开多媒体设备 MMControl1.Command = Play 开始播放 End Sub Private Sub Command1_Click()