毕业论文——一个简单的媒体播放器的设计与实现

1、一个简单的媒体播放器的设计与实现如今流行的媒体播放器虽然很多，但都或多或少存在一些缺陷，比如：没有 记忆的功能；下次播放的时候不能从上次离开的曲目开始；没有身份认证功能； 不能有效的保护媒体播放器里面的歌曲专有性；功能组合与用户的习惯相违背； 界面太复杂以及操作太难等。随着人们对娱乐耍求的提高，一款别致的、贴近用 户操作习惯的播放器非常值得去研究和开发。本论文所描述的播放器是在microsoft visual studio .net 2003平台下利用 visual basic.net 语言完成的。使用 visual basic.net 提供的 windows media player控件以及

2、文件处理，最终实现一款别致的，贴近用户操作习惯的媒体播放 器。该播放器实现了对wav、mid、mp3、mov等格式的多媒体文件的播放功 能；实现了播放列表加载多个多媒体文件并可以自定义播放顺序；实现了用户的 身份认证、连续播放、记忆播放以及自动关闭播放器等功能。关键词：媒体播放器；visual basic.net； microsoft visual studio .net 2003；windows media player 控件；记忆功能the design and implement of a simple media playerabstractnowadays, there are ma

3、ny popular media players. they have more or less certain shortcomings. for example, the media player is no memory function, the next player didn't start from the program the last time leaved; no identity authentication, no effective protection for the proprietary of songs in the media player; fu

4、nction combination is against the users1 habit, or complex interface, too difficult to operate and so on. with the improvement of requirements for the entertainment, a chic player which closed to the people's operation habit is very worth researching and designing.the thesis described the player

5、 which was developed by visual basic.net based on microsoft visual studio .net 2003. implement using file manipulation and windows media player controls, ultimately implement a media player which is unique and press close to user habit.the player realized play function for the multimedia documents o

6、f wav, mid, mp3, mov formats and so on; realized to load several multimedia files by playlists and customize the play order; realized the function of identity authentication, continuous play, memory function and realized to be automatically shutted down.key words： media player; visual basic.net; mic

7、rosoft visual studio .net 2003; windows media player controls; memory function1引言1.1项目背景多媒体播放器的设计是一门集计算机技术和数字多媒体技术于一体的综合 设计。随着中国计算机技术、宽带网络技术的发展，越来越多的人开始重视多媒 体播放器的发展与应用。再加上如今的播放器虽然种类多样化，但无论是windows 系统自带的windows media player播放器，还是现在网上流行的千千静听，或 者是kugoo播放器都或多或少都存在着一些缺点，而这些缺点要么是界面与人们 平时的生活习惯不相符，或者是复杂难懂；要

8、么就是功能不全不能满足人们对网 络娱乐的追求。随着多媒体的发展，市场潜力的开发，多媒体硕件环境和软件环境的不断完 善，以及多媒体播放器开发环境的成熟，尤其是microsoft公司开发的windows 编程工具visual basic.net语言的成熟和完善。为多媒体播放器的研究和开发 提供了先进的思想和多样的媒体控制手段，成为多媒体应用程序开发的理想工 具。而此次设计不仅具有操作简便、界面友好等特性；而且在功能方面更贴近人 们的生活习惯和操作习惯。此多媒体设计能识别多中格式的多媒体文件，其中包 括wav, mp3, mid, mov,等多媒体文件；在播放列表中可以加载一个或者多个 多媒体文件；

9、自动连续播放多个多媒体文件；用户能随意改变播放顺序；在下次 打开播放器时，从上次关闭处继续播放文件；在使用播放器前将进行身份认证； 在播放列表的多媒体文件播放完后可以选择自动关闭播放器或者循环播放。1.2国内外现状在当今信息社会，以多媒体为特征的信息技术和信息产业的发展及应用对人 类社会产生的影响和作用愈来愈明显，愈来愈重要。多媒体能改变信息的包装， 实现知识信息数字化，为人们获得知识信息提供极大的方便和无穷的乐趣。友善 的人机界面、多种多样的多媒体教学软件、诱人的电子游艺节目、身临其境的多 媒体导购系统、五花八门的信息家电和高效方便的网上查询等等，无不渗透着多 媒体的作用，它引导人们进入了一

10、个有声有色的世界。同时，多媒体的发展和应 用，极大地推动了各行各业的相互渗透和飞速发展，大大改变了人类社会的工作 环境和生活方式。可毫不夸张地说，多媒体产业的形成和发展，不仅引起了计算 机工业的一次革命，也正在深刻地影响人类社会发牛巨大的变革。多媒体技术的 发展在很大程度上依靠于多媒体软件开发的水平。目前，不管是支撑多媒体系统 的系统软件，还是管理和开发软件，以及多媒体的应用软件都在能力和数量上还 难以满足多媒体飞速发展的需要。特别是多媒体应用软件的缺乏，一肓是制约多 媒体产业发展的瓶颈问题，因此己成为多媒体研究和开发的关键问题。如何制作 和设计岀大量高质量的多媒体应用软件是计算机从业人员所面

11、临的迫切课题，也 是广大人民群众所关心的事情。1.3项目意义结合visual basic.net语言提供的先进的思想和多样的媒体控制手段，结 合用户使用媒体播放器的习惯和对媒体播放器的要求，设计了一款界面清楚明 了，操作简单实效，可以实现在播放列表中可以加载一个或者多个多媒体文件； 自动连续播放多个多媒体文件；用户能随意改变播放顺序；在下次打开播放器时, 从上次关闭处继续播放文件；在使用播放器前将身份认证；在播放列表的多媒体 文件播放完后可以选择自动关闭播放器或者循环播放等功能的媒体播放器。1.4项目实现方法1）设计的编程语言是visual basic.net,利用visual basic.n

12、et多媒体 控件中的windows media player控件来实现多媒体相应功能。2）利用visual basic.net强大的文件处理能力，实现身份认证功能和记忆 功能。2开发运行平台分析2.1 microsoft visual studio .net 2003visual studio .net 2003是一个全面的开发工具，用于快速构建面向 microsoft windows和web并连接microsoft . net的应用程序，极大地提高 了开发人员的效率。为解决今天最具挑战性的软件开发需要而构建的visual studio .net 2003 增强并进一步完善了其前代产品的功能，

13、并与前代产品高度兼容。visual studio.net 2003包括来自modeler的全套功能，可帮助构建最复杂的企业级 应用程序和在最小的设备上部署应用程序。visual studio .net 2003将移动和嵌入式设备，如pocket pc和其他采 用microsoft windows ce .net操作系统的设备，带入.net。如今，开发人员 能够使用同样的编程模型、开发工具及编程技能，来构建应用范围广泛一一从小 设备到最大的数据中心一一的应用程序。开发人员可以使用visual studio . net来：1）构建功能强犬而且响应能力极好的基于windows的应用程序。2）构建功能

14、强犬而且响应能力极好的pocket pc应用程序。3）构建完善而安全的web应用程序。4）构建对设备有智能感知能力的完善而安全的移动web应用程序。5）在以上任何一种应用程序中使用xml web scrviccso6）避免“dll灾难” o7）消除代价高昂的应用程序部署和维护问题。visual studio . net是唯一的从头至尾都是基于通过xml web service进 行集成这一思想而构建的坏境。通过允许应用程序通过internet共享数据，xml web services使开发人员能够利用新的和现有的代码构建应用程序，而不用考 虑平台、编程语言或对象模型。2.2 visual ba

15、sic.net 技术visual basic. net是运行于windows平台上的交互式的可视化集成开发环 境,是美国microsoft公司开发的microsoft visual studio. net套件的一部分。 visual basic.net集程序的代码编辑、编译、连接和调试等功能于一体，提供 了一个完整方便的开发界面和许多有效的辅助开发工具。visual basic. net中带有的windows media player控件为开发媒体播放器 提供了很好的技术支持和实现的可能。而windows media player activex控件 提供了一套功能强大的com对象模型。控件所

16、支持的媒体文件格式多样，基本包 括所有常用的媒体格式。visual basic.net的文件处理功能强大，通过对文件的读写以及其他操作, 可以方便快捷的实现媒体播放器记忆播放功能和身份认证功能。2. 3 windows media player 控件windows media player控件的功能相当完善，而.且有漂亮的视频插件，在 播放音频文件时，可以享受漂亮的视觉效果。1）控件的添加：打开工具箱，在空白处点击鼠标右键，选择右键菜单中的 新建项，将弹出选择工具箱项对话框，在此对话框中，从com组件选项 卡中勾选z/windows media player"组件，确定返回。2）控件

17、常用属性介绍：w i ndowsmed i ap 1 ay er 1. url二你要播放的某文件；这里指定你要播放的文 件。win dowsmed i ap 1 ay er 1. con trols. play； 播放。w i ndowsmed i ap 1 ay er 1. con trols. pause； 暂停。win dowsmed i ap 1 ay er 1. cont rols. stop； 停止。win dowsmed i ap 1 ay er 1. fullscree n； 全屏。3系统总体分析3. 1系统总体结构设计及分析本设计将采用windows media player

18、控件结合文件读写等来全面实现多媒 体文件的播放和操作。系统结构图如1所示：图1设计系统结构图3. 2系统功能设计设计的功能主要分四大子模块：文件加载、播放、关闭、认证。文件加载是 由打开和添加两个子功能模块组成。播放包括自定义播放顺序、连续播放多个文 件、记忆播放三个子功能模块。自定义播放顺序则是由上一首、下一首、暂停/ 播放、停止、播放列表等子功能模块组成。关闭是由循环播放和播放一次就关闭 两个子功能模块组成。身份认证是由登陆和修改认证两个子功能模块组成。系统功能概要图如图2所示：图2系统功能概要图3.2.1 认证认证包括两个子功能：1）认证登录：通过用户名和密码的认证登陆，播放器才能被使用

19、，功能主 要是保护隐私，不能是所有人都能使用播放器，实现了权限的分级，更具有安全 性。2）修改认证：输入原来的用户名和密码，再输入想修改成的用户名和密码, 单击确定。当下次打开播放器的吋候，认证将采用修改后的新用户名和新密码。3.2.2 文件加载文件加载包括两个子功能：1）打开：加载一个或者多个文件到播放列表中，并自动播放；加载新的文 件进入时，覆盖播放列表中原有的播放文件。2）添加：加载一个或者多个文件到播放列表中，不会覆盖原有的播放列表, 只是添加在原有列表的后面o323 播放播放包括了三个子功能：1）自定义播放顺序：单击下一首按钮，开始播放下一个文件,单击上一首按 钮，开始播放上一个文件

20、。单击暂停按钮，则播放器暂停播放，同吋暂停按钮变为 开始按钮,单击开始按钮，播放器从暂停处继续播放，同吋开始按钮恢复为暂停按 钮。单击停止按钮，播放器停止播放。双击播放列表中想要播放文件的文件名， 直接播放。2）连续播放多个文件：用户可以添加一个或者多个多媒体文件在播放列表 中，若添加多个文件，则按顺序连续循环播放。并在播放器的标题栏显示正在播放歌曲或者视频的名字。3）记忆播放：退出播放器时，程序自动将用户选择的目录保存到index文件 夹中，以便下次打开播放器时，读取index文件夹中保存的文件记录，可以直接从 上次退出时正在播放的那个文件开始继续播放，这样就能实现每次启动播放器, 首先播放

21、的是上次退出时播放的那个文件。这样做就使得播放器具有了记忆功 能。3.2.4关闭关闭包括两个子功能：1）循环播放：在默认情况下，播放器是处在循环播放状态中，所谓循环播 放就是当播放完播放列表中的多媒体文件时，又回到第一个文件开始播放。2）自动关闭：播放完播放列表中的所有文件后，如果选择了自动关闭功能, 那么可执行的播放器将自动关闭。当再次打开播放器时，播放器又从第一个文件 开始播放。4系统实施方案4. 1媒体播放器界面设计此界面实现设计的大多功能，其中包括文件的加载，播放，以及关闭播放器 等功能。媒体播放器播放界面如图3所示：图3媒体播放器界面4. 2身份认证4.2.1 登录初始化的用户名和密

22、码可以通过身份认证，只有通过身份认证的用户才能够 正常的使用播放器。登陆界面如图4所示:丄多媒休播：登录:第7页共26页打开播放器就会自动弹出一个登陆界面，如图4所示，输入初始用户名和密 码进入播放器界面，如图3所示，才能正常使用播放器。在文件中输入原始的用 户名和密码，打开播放器时，在登陆界而中输入原始用户名和密码后，输入的将 于文件中的原始用户名和密码进行对比，如果是正确的，将启动播放器。如果错 误将弹岀错误提示框。其实现代码为：1) 用户名和密码保存函数if fileexists(application startuppath & "pass.txt") th

23、endim obj as new streamreader(app1ication. startuppath & pass. txt", true)strtest = obj. readlineoobj. close 0end if2) 读取保存信息：readindex ()forml. show()forml. windowsmediap1ayer1. ctlcontrols.stop()forml. enabled = false此时播放器是不可用的。3) 输入信息和保存信息的比较：dim strl as stringstrl = textboxl. text + tox

24、tbox2.textif strl = strtest thenforml. show()forml. enabled = trueforml. w i ndowsmed i al31 ay er 1. ctlcon trols. play ()me. hide 0elsemsgbox(/z用户名或者密码错误)end if4.2.2认证修改当一个用户名和密码用久了，它的保密性也就随之下降了，认证修改提供解 决问题的途径，及时的修改用户名和密码可以保证播放器系统的安全性，能使播 放器的专有性更强。认证修改界面如图5所示：w文t雷认证修茂图5认证修改界面单击操作，选择修改认证，将会弹出修改认证界面

25、，如图5所示，输入i口用 户名和密码，再输入新用户名和密码，点击修改，如果跟文件中原有的i口用户名 和密码对比相同，那么修改成功，下次登陆将采用新的用户名和密码，如果i口用 户名和密码与文件中原有用户名和密码不相同，那么修改失败，弹出出错提示框。 其实现代码为：1) 读取用户名和密码：tf fi1e. exi sts(appli cation startuppath & "pass.txt") thendim obj as new streamreader (appl i cat ion. startuppath & pass. txt，z, true)na

26、mea.ndpass = obj. readlineoobj. closeoend if2) 写入用户名和密码：tf fi1e. exi sts(appli cation .startuppath & "pass.txt") thenfile. delete(appl iestion. startuppath & "pass.txt")end tfdim obj as new streamwriter(applicat ion. startuppath & "pass.txt", true)obj. wri t

27、e (str)obj. closeo3) 比较旧用户名和密码并用新用户名和密码代替：olclnameandpass = textbox4. text + | + textbox3. textif oldnameandpass = nameandpass thendim newnp as stringnewnp = textboxl.text + textbox2. textwritepass(newnp)me. close ()elsemsgbox(/z用户名或者密码错误！ )end if4. 3文件加载系统4.3.1打开打开系统是向播放列表加载一个或者多个多媒体文件，通过打开加载文件 时，将

28、会覆盖播放列表中已有的文件。并且将自动播放。其实现代码为：1) 打开文件：with openfile.filename =.filter二"视频文件(*. rm;*, rmvb; *. dat; *. avi ;mp3;*, asf ;*. mpg) |*. rm;*, rmvb; *. dat; *. avi ;* .mp3; *. asf;*. mpg | 音频文件(*. mp3;*. wav; *. wmamid) | *. mp3; *. wav;*. wma;mid | 所有文件(*. *) | *. *.multiselect = truetf . showdialogo

29、 = dialogresult. cancel then exit subend with2) 清空播放列表：fi1e = openf i1e. fi1enames. lengthtf file = 0 then exit sub播放列表.ttems. clear ()f i lei ist. clear ()3) 加载新文件：filename = openfile. filenamesredim strfile(file)for i = 0 to file - 1for j = 0 to filename(i). lengthtf microsoft. visual basic. right

30、(filename(i), j + 1). chars(0) = thenstrfile(i) = ctype(microsoft. visualbasic. right(fiendme(i), j), string)strfile(i)=ctype (microsoft. visualbasic. left(strfile(i),strfile(i). length - 4), string)for i = 0 to file 一 1播放列表.items. add(i + 1 & "& strfile(i)filelist. add(filename(i)4) 自动

31、播放：windowsmediaplayerl. url = filename(0)播放列表.setselected (0, true) cmbadd ()5) 操作流程：单击图3上而的'打开'按钮，弹岀文件加载对话框，如图6所示:打开直找范围d)：我摄近的文档桌面我的文档我的电脑网上邻居上j梁咏琪宀胆小鬼 勺梁咏琪沉迷 固梁咏琪當我愛上你 回梁咏琪短髪 固梁咏琪花火 q梁咏琪淚光 會梁咏琪-魔幻季节 梁咏琪-透明 梁咏琪洗瞼 曾粱咏琪-向左走向右走 ©梁咏琪.新鮮 q林俊杰江南州 督林俊杰千年以后原林忆莲至少还有你 刘德华一世界第一等国刘若英当爱在靠曾刘若英一辈子的孑

32、 d刘若英分开旅行 會马郁.下辈子如果我皆莫文前爱死你齐案犬约在冬季群星-手牵手 孙楠缘分的天空 越孙燕姿.许美静.: 會孙燕姿一眼泪成诗孙燕姿遇见孙燕姿摄新啊« 陶吉吉爱我还是专1111文件名):p梁咏琪胆小鬼叭.dat粱咏琪-沉打开©文件类型(x):|所有文件(*)二|取消|图6打开弹出对话框选择要打开的文件，单击图6的“打开”按钮，加载文件成功。加载成功后对比加载前后的播放列表发现打开的文件代替了播放列表中原有的文件。如图7, 8 所示：1. 080张学友她来听我的演唱会演）（宝丽金i2. 082张学友旧情綿绵（演）（宝丽金ktv） 463. 091张学友李香兰（演唱

33、会）（宝丽金ktv） 6：4. 118张学友情书（演唱会）（宝丽金ktv） 40 i5. 153张学友忘记你我做不到（谩唱会）（宝丽金6. 160张学友吻别（演唱会）（宝丽金ktv） 52 17. beyond -光辉岁月.图7 “打开”操作前播放列表图1. 梁咏琪宀胆小鬼mv2. 梁咏琪沉迷3. 梁咏琪當我愛上你4. 梁咏琪短髮5. 梁咏琪花火6. 梁咏琪淚光7. 梁咏琪魔幻季节.8. 梁咏琪透明.9. 梁咏琪洗臉图8 “打开”操作后播放列表图4.3.2 添加添加系统的功能是向播放列表添加多媒体文件，一次可以添加一个或者多个 文件，不影响播放列表中的原有文件，仅仅是在其后增加文件。其实现代码

34、相比 打开仅仅是少了清空播放列表的代码，在这里就不赘言了。操作流程：单击图3上面的“添加”按钮，弹出打开对话框，如图9所示，图9添加弹出对话框选择要添加的文件，单击图9上的“打开”按钮，添加成功。添加前后的播放列表对比，如图10, 11所示：1. 梁咏琪-月旦小兎.mv2. 梁咏琪沆迷3. 梁咏琪當我愛上你 斗梁咏琪-短髮5. 梁咏琪花火6. 梁咏琪淚进7. 梁咏琪魔幻季节.8. 梁咏琪透明.9. 梁咏琪洗瞼10. 蔡淳隹-等一个bm天1 1.兼依林-垓i12. 蔡依林-骑士精神.13. 斬迹1壬周杰伦-白隹冈车.图10添加操作后播放列表图1. 梁咏琪-胆小m.mv2. 梁咏琪沉迷3. 梁咏琪

35、當我愛上你4梁咏琪垣髮5. 梁咏琪花火6. 梁咏琪淚光7. 梁咏琪魔幻季节.8. 梁咏琪透明.9. 梁咏琪洗恥图11添加操作前播放列表图4.3.3 清空清空系统的功能是清空播放列表中加载的文件，清空后播放完当前正在播放 的文件后就不会播放清空前加载的文件。其实现代码为：f i lei ist. clear ()播放列表.items. clear() intcount = 0comboboxl. text = writeindex(0)tschange = true操作流程：单击图3的“清空”按纽，清空播放列表里面的文件，播放列表在清空前后的对比图如图12, 13所示：1. 梁咏琪-月旦&quo

36、t;j、鬼.mv2. 梁咏琪-沅迷3. 梁咏琪當我董上你斗梁咏琪-短髮5. 梁咏琪-花火6. 梁咏琪-淚进7. 梁咏琪魔幻季节.8. 梁咏琪透明.9. 梁咏琪-洗瞼10. 蔡淳隹-等一个am天1 1. 依林-flh jlrr1 2.蔡依林-嘀士穡神.13. 轨迹14. 周杰伦白隹冈车.图12清空前播放列表图图13清空后播放列表图4. 4文件播放系统4.4.1暂停/播放当正在播放文件时，按钮显示为暂停，单击按钮，播放停止，按钮转换为播 放，再次单击按钮，文件从上次暂停处继续播放，按钮转换为暂停。其实现代码 为:isplay = not isplaytf tsplay = true thenbut

37、ton3. text ="播放windowsmediap1ayer1. ctlcontrols. pause ()elsebutton3. text = 暂停windowsmediap1ayer1. ctlcontrols play ()encl if4.4.2 停止单击停止按钮，正在播放的文件停止播放，播放进度条跳回到起点，暂停/ 播放按钮由暂停状态转变成为播放状态。其实现代码为： windowsmediap1ayer1. ctlcontrols. stop()timerl. enabled = falsetimer2. enabled 二 falseslider. value 二

38、 slider. minimumisplay = not isplayif isplay = true thenbutton3. text ="播放"end if4.4.3自定义播放顺序当用户想通过自己的操作随意改变播放的顺序时，可以采取三种方式：单击 上一首按钮；单击下一首按钮；在播放列表中双击任意一个文件的名称，从而实 现自定义播放顺序。1) 上一首单击上一首按钮，播放器马上停止播放当前文件，重新开始播放上一个文件, 当播放器列表中只有一个文件或者是正在播放第一个文件或者单击上一首倒退 到第一个文件，上一首按钮将失去作用。其实现代码为：if filelist. coun

39、t > 0 and intcount > 0 thenwindowsmediaplayerl. url 二 filelist. ltem(intcount - 1)intcount = intcount 一 1播放列表.sotselectod (intcount, true)textboxl. text 二 filewrite. getfilename(filelist. item(intcount)if intcount > 0 thoncomboboxl. text ="第"& intcount + 1 & 首"elsecom

40、boboxl. text ="第 1 首"end iftimer2. enabled 二 true2) 下一首单击下一首按钮，播放器将停止播放当前文件，重新开始播放下一个文件， 当播放器列表中只有一个文件或者是正在播放最后一个文件或者单击下一首前 进到最后一个文件，下一首按钮将失去作用。其实现代码为：if filelist. count > intcount + 1 thenwindowsmediaplayerl. url 二 filelist. ltem(intcount + 1)intcount = intcount + 1播放列表.sotselectod (in

41、tcount, true)textboxl. text 二 filewrite. getfilename(filelist. item(intcount)comboboxl. text ="第"& intcount + 1 & "首"timer2. enabled 二 trueexit subend if3) 双击播放列表中文件名称双击播放列表中任意一个文件名称，播放器将会结束当前正在播放的文件转 到播放用户选择的文件，播放完用户选择的文件后，播放器将自动从选择文件后 连续播放其他文件。其实现代码为：播放列表.setselected (c

42、lnt (comboboxl. selectedlndex), true)intcount = clnt(comboboxl. selectedlndex)windowsmediaplayerl. url 二 filelist. ltem(intcount)textboxl. text 二 filewrite. getfilename(filelist. ltem(intcount)if timerl. enabled = false thentimerl. enabled = trueend iftimer2. enabled = true4.4.4连续播放多个文件的实现播放器开始播放后将连

43、续播放后面的其他文件，不需要用户再去手动才能继 续播放，使整个播放过程自动化，连续化，从而使用户全身心倾听或者观看多媒 体文件。其实现代码为：strfilename = textboxl .textfor i = 0 to 播放列表.items. count - 1if 播放列表.items. ltom(i) = cstr(i + 1 & ". "& sttf订enamo)then播放列表.sotselectod (i + 1, true)intcount = i + 1w i ndowsmed i ap1ayer1url = filelistitem(in

44、tcount)if timerl. enabled = false thentimerl. enabled = trueend iftimer2. enabled 二 truecomboboxl. text ="第"& intcount & "首"exit subend ifnextif messagebox. showc经查没有这首歌曲，是否另选歌曲？，信息, messageboxbuttons. yesno,messageboxicon. information,messageboxdefaultbutton.buttonl)二 di

45、alogresult.yes thentcxtboxl. focus ()textboxl. selectall ()elseexit subend ifend if4.4.5记忆播放当播放器列表中的文件还没有播放完毕就关闭播放器，但是下次再打开播放 器的时候想从上次关闭时的文件开始播放，这就是所谓的记忆播放功能。首先通 过创建一个文件，当关闭的时候把关闭时候的播放列表信息写进文件，再次打开 播放器便从文件中读出播放列表中的信息，从而实现记忆播放功能。其实现代码 为:1) 写入信息：if file.exists(application. startuppath & "inde

46、x.txt") thenfile. delete(application. startuppath & "indcx.txt")end ifdim obj as new strcamwriter(application .startuppath&"index. txt", true)obj.write (intcount)obj. close ()2) 读出信息：if fileexists(application. startuppath & "index.txt") thendim obj as n

47、ew streamreader(application. startuppath & "index. txt", true)strtest = obj. readlineointcount = 0 + strtestobj. close ()end if3) 打开播放器读入播放列表信息：dim reader as new xmltoxtreader(filename)trydo while (reader. read()select case reader. nodotypocase xmlnodetype elementif reader. name 二"

48、;pathnanie" thenreader. read ()filelist add (reader. value)elself reader. name = "f订ename" thenreader. read ()播放列表.items. add (reader. value)end ifend selectloopreader. close ()catch ex as exceptionfinallyif not reader is nothing thenreader. close ()end ifend try 在实例再次打开函数中引用函数readind

49、ex(),当播放器再次打开时，就会 从文件中读却保存下来的信息，从而实现记忆播放的功能。4.5关闭当播放列表中的文件播放完毕后，用户可以选择循环播放，或者是关闭播放 器。设一变量dim plycount as boolean = true,在默认情况下变量为真，并 使播放器循坏播放，如果变量为假，则使播放器播放完列表文件就关闭播放器。 其实现代码为：if intcount = listbox1.1terns. count and plycount = true thenintcount = 0windowsmediaplayerl. url = filelistitem(intcount)li

50、stboxl.setselected(intcount, true)'/使其被选屮textboxl.text =filewrite. geteilename(filelist. ltem(intcount)comboboxl. text ="第"& intcount + 1 & 首"timer2. enabled 二 trueend ifif intcount = listboxl. items. count and plycount = false thenintcount = 0writeindex(intcount)applicat

51、ion. exit ()end if操作流程：在默认下播放器自动循环播放，如果要选择播放完一次就关闭播 放列表则单击图3上面的“操作”菜单，选择“播放”选择“播放一次就关闭” o 如图14所示：強播放器正在播放-蔡依林-图14选择关闭播放器图4.6全屏为了用户能更好的享受多媒体带来的视觉享受，项目增加了全屏功能，其实 现代码为：wi ndowsmediaplayer1. ful1 screen 二 truecatch ex as exceptionmsgbox(ex. tostri ng)end try全屏的实现是有条件的，当播放器正在播放或者暂停文件时候，可以全屏, 如果处在停止情况下是不能

52、全屏的。if windowsmediaplayer 1. status = 已停止 thentrytf windowsmediap1ayerlfullscreen 二 true thenwindowsmediaplayer1. full screen 二 fal seend tf5系统运行及测试结果5. 1测试方案5.1.1 测试方法测试分为白盒测试和黑盒测试，白盒测试需全面了解程序内部逻辑结构、对 所有逻辑路径进行测试，是一种穷举路径测试；黑盒测试也叫功能测试，他只检 测能不能按照规格说明书的规定正常使用，程序是否能否适当的接受输入数据产 生正确的输岀。5.1.2测试方案选择由于项目各模块之

53、间的关系复杂，代码量比较大，而且项目的功能独立而有 明显，采用白盒测试工作量大，不易具体实现。鉴于上述原因选择采用了黑盒测 试方案，既可以缩短测试的时间，又可以将程序中的不足展现岀来。5. 2测试结果表1测试结果表编号功能模块被测功能测试步骤预期结果测试结果备注1登陆确认登陆， 激活播放器1）输入正确的 用户名和密码2）输入错的用 户名和对的密 码3）输入对的用 户名和错误的 密码4）输入错的用 户名和密码在1）情况下登陆 成功，可以正常使 用播放器；在2）,3） , 4）情况下登 陆失败，弹出出错 对话框在1）情况下登陆 成功，可以正常使 用播放器：在2）,3） , 4）情况下登 陆失败，弹

54、出出错 对话框通过2打开加载一个或 者多个文件1）加载一个多 媒体文件2）加载多个多 媒体文件成功加载一个或者 多个多媒体文件， 并覆盖播放器列表 中的原有多媒体文 件成功加载一个或者 多个多媒体文件， 并覆盖播放器列表 中的原有多媒体文 件通过2播放/暂停播放和暂停 转换1）播放状态下 点击暂停按钮2）暂停状态下 点击播放按钮成功在暂停和播放 之间转换成功在暂停和播放 之间转换通过3停止停止播放文 件点击停止按钮播放停止，播放进 度条回到起点播放停止，播放进 度条回到起点通过4全屏全屏切换1）在播放或者 暂停状态下点 击全屏按钮2）在停止状态 下点击全屏状 态3）全屏状态下 按键盘上的esc

55、 键在1）情况下可以 全屏，在2）诸况 下不能全屏,并出 现出错提示框，在3）情况下冋到初始 大小状态在1）情况下可以 全屏，在2）悄况 下不能全屏，并出 现出错提示框，在3）情况下冋到初始 大小状态通过5下一首自定义播放 顺序1）在播放第一 个文件的时候 点击下一首按 钮在1）情况下播放 下一个文件；在2） 情况下按钮失去作 用；在3）情况下在1）情况下播放 下一个文件；在2） 情况下按钮失去作 用；在3）情况下通过2）在播放最后 一个文件的时 候点击下一首 按钮3）在上面两种 情况以外播放 任意一个文件 时候点击f 首按钮播放下一个文件播放下一个文件61二一首口定义播放 顺序1）在播放第一

56、 个文件的时候 点击上一首按 钮2）在播放最后 一个文件的时 候点击上一首 按钮3）在上而两种 情况以外播放 任意一个文件 时候点击上一 首按钮在1）情况下按钮 失去作用；在2） 情况下播放上一个 文件；在3）情况 下播放匕一个文件在1）情况下按钮 失去作用；在2） 诸况下播放上一个 文件；在3）情况 下播放匕一个文件通过7添加加载一个或 者多个文件1）添加一个多 媒体文件2）添加多个多 媒体文件在1）情况下在原 有的播放器列表中 成功添加一个多媒 体文件在2）情况下在原 冇的播放器列表中 成功添加多个多媒 体文件在1）情况下在原 有的播放器列表中 成功添加一个多媒 体文件在2）情况下在原 冇的播放器列表中 成功添加多个多媒 体文件通过8清空消空播放列 表中的多媒 体文件点击清空按钮播放列表中的所有 多媒体文件都被成 功删除播放列表中的所有 多媒体文件都被成 功删除通过9播放列表 选择随意 播放自定义播放 顺序1）双击播放列 表中的第一个 多媒体文件2）双击播放列 表中的最后一 个多媒体文件3）双击正在播 放的多媒体文 件4）双击前三屮