(中职）Visual Basic 6.0程序设计第8章ppt课件-【中职专用】《计算机类》同步教学课件

多媒体与网络程序设计 【实例28】 影片播放器 【实例29】 网页浏览器 【实例28】 影片播放器 案例效果 程序可用于播放AVI影片（含音频） 技术分析 1．多媒体控件 2．动画(Animation)控件 （1）AutoPlay属性 （2）BackStyle属性 （3）Center属性 （4）Open方法 （5）Play方法 （6）Stop方法 （7）Close方法 技术分析 3．Multimedia MCI多媒体控件 （1）Multimedia MCI控件常用的属性与事件 （2） Multimedia MCI控件的常用命令 （3）使用Multimedia MCI 控件时的注意事项 操作步骤 1．创建程序界面 新建一个“标准 EXE”工程，按前面所学过的添加ActiveX控件的方法将Multimedia MCI 控件加入工程，该控件对 应的部件为“Microsoft MultiMedia Control 6.0”。 2．程序代码编辑 在程序中输入以下代码。 程序代码： Option Explicit Private Sub Command1_Click() CommonDialog1.ShowOpen '打开"打开文件"对话框 MMControl1.Orientation = mciOrientHorz '控件按钮水平排列 MMControl1.DeviceType="AVIVideo" '指定MCI设备的类型为AVI播放器 MMControl1.Notify=False '使Multimedia MCI控件不发出回调信息 MMControl1.Shareable = False '指定多媒体设备不能共享 MMControl1.Wait = True '在前一命令完成之前，控件不可用 MMControl1.FileName = CommonDialog1.FileName '设定播放文件和路径 MMControl1.Command = "Open" '激活Multimedia控件中的按钮 End Sub Private Sub Form_Load() CommonDialog1.Filter="全部文件|*.*|AVI视频文件|*.AVI" '设置"打开文件"对话框的文件过滤 End Sub Private Sub Form_Unload(Cancel As Integer) MMControl1.Command = "Close" '关闭MCI设备 End Sub Private Sub Command2_Click() End End Sub 知识进阶 1．MediaPlayer控件 2．影片播放器 （1）新建一个“标准 EXE”工程，在窗体上添加四个命令按钮控件。 （2）单击“工程”→“部件”菜单命令，在“控件”列表中选择“Microsoft Common Dialog Controls 6.0”和“Windows Media Player”项，然后单击“确定”按钮 （3）为程序设计菜单，菜单项的内容按表8-5进行设置。 （4）最后，为程序添加如下代码。 思考练习 1．填空题 （1）多媒体的实质是 。不同的信息形式包括 、 、 、 、 和 。 （2）VB提供的4个多媒体播放控件是 控件、 控件、 控件和 控件，它们都属于 控件。这4个多媒体播放控件的OCX文件都存放在 目录下。 （3） 控件只能播放没有声音的视频动画AVI文件。 （4） 控件从本质上来说是Win32 API中MCI命令的VB可视化接口。 2．程序设计题 （1）使用Multimedia MCI多媒体控件，编写一个可播放VCD的程序。 （2）使用MediaPlayer多媒体控件，编写一个多功能的多媒体播放器。 【实例29】 网页浏览器 案例效果 本实例是一个使用网络控件设计的