- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
媒体播放器课程设计报告书
课程设计报告书
题 目: 媒体播放器
系 部: 计算机信息与工程系
专 业: 计算机网络技术
班 级: 计网061班
姓 名: 肖忠祥
学 号: 10
2008年7月5日
目录
一、内容提要 3
二、程序功能简介 3
三、设计步聚及内容 4
1.设计分析: 4
2.程序说明: 5
3.操作方法(流程): 5
四、 设计体会。 9
一、内容提要
本次实习内容是利用Visual Basic设计一个简单的媒体播放器,Visual Basic是美国推出的可视化的程序设计语言,它是面向对象和采用事件的驱动方式的结构语言,开发的程序可在Windows环境下运行。此次设计的媒体播放器功能简单实用,比较容易被用户所使用,此报告详细介绍了此媒体播放器的编辑思想和方法,并给出了相关的源代码,便于使用者参考。该媒体播放器突破了传统媒体播放器功能繁多复杂的特点,所设功能简单实用,操作起来方便。
二、程序功能简介
该该浏览器除有播放音频文件、视频文件及CD唱片的功能外,在主窗体上还设有 “文件”、“显示控制”、“声音控制”、“文件类型”和“帮助”五个菜单,并且菜单下还有子菜单,具备一些实用的功能。即打开、退出、全屏、还原、窗体大小切换、升高音量、降低竟是、静音、另存为和播放、暂停、停止、等功能。并且每个菜单设置了快捷键或热键。一些详细功能见下图所示。
三、设计步聚及内容
1.设计分析:
(1)主窗口的设计: 利用菜单编辑器设计菜单控件,使能构实现所需功能。另外用Windows media player 控件实现各种多媒体文件的播放界面,效果和上图一样。
(2)CD窗口的设计:使用MMControl、Command、Slider1、Label、CommonDialog、Timer等控件完成CD的播放过程。其效果要求如下图所示。
(3)制作media player信息框:制作过程通过添加窗体中的关于对话框即可。其内容包括版本、作者权及相系统信息等。其界面效果要求如下图所示。
2.程序说明:
实用性:应用程序要有明确的应用主题,有一定的实用价值。
结构性:应用程序具有良好的程序结构。
可读性:应用程序具有较好的可读性。
全面性:根据题目内容,应用程序应包含比较全面的功能。
友好性:根据题目要求,合理使用VB提供的各种控件,设计友好、美观的使用界面
3.操作方法(流程):
(1)建立工程:启动Visual Basic,进入集成开发环境。新建一个工程文件。
(2)窗体设计:进入窗体设计器,开始进行多媒体播放器的界面设计。
(3)菜单设计:参考已有的媒体播放器功能,简要设计“多媒体播放器”的下拉式菜单内容。
(4)编写代码:编写菜单命令的事件代码如下:
主窗口代码
Private Sub Form_Resize()
MediaPlayer1.Width = ScaleWidth
MediaPlayer1.Height = ScaleHeight
End Sub
Private Sub MnuAbout_Click()
frmAbout.Show
End Sub
Private Sub MnuDouble_Click()
MnuDouble.Checked = True
MnuFull.Checked = False
MnuHalf.Checked = False
MnuOriginal.Checked = False
MediaPlayer1.DisplaySize = mpDoubleSize
End Sub
Private Sub MnuExit_Click()
End
End Sub
Private Sub MnuFull_Click()
MnuFull.Checked = True
MnuHalf.Checked = False
MnuOriginal.Checked = False
MnuDouble.Checked = False
MediaPlayer1.DisplaySize = mpFullScreen
End Sub
Private Sub MnuHalf_Click()
MnuFull.Checked = True
MnuHalf.Checked = False
MnuOriginal.Checked = Fals
文档评论(0)