多媒体播放器的设计

/目录１vb简介………………12多媒体播放器的开发设计…………22。1设计要求…………２2.２设计方案…………22．3基本原理…………３3设计方案的实现……………………54程序代码……………55运行结果……………106心得体会……………137参考资料……………1４1ＶB简介Viｓuaｌ意为可视的、可见的，指的是开发像Windｏws操作系统的图形用户界面（GｒａphicUseｒInｔerfａｃe，GUI）的方法,它与其他编程软件不同的是不需要编写大量代码去描述界面元素的外观和位置，只要把预先建立好的对象拖放到屏幕上相应的位置即可。应该说,这是一次质的飞跃，是一次编程技术的革命。Ｂaｓic实际上是一个短语的缩写,这个短语就是Begiｎnerｓ'Ａll-PｕrposeSｙmbolicInsｔrｕctiｏnCｏｄe，其中文意思为“初学者通用符号指令代码”。ViｓuａlBasic6有学习版、专业版和企业版三种版本,以满足不同的开发需要。学习版适用于普通学习者及大多数使用ＶiｓuａlBａｓｉc开发一般Wiｎdoｗs应用程序的人员；专业版适用于计算机专业开发人员，包括了学习版的全部内容功能以及Iｎternｅt控件开发工具之类的高级特性;企业版除包含专业版全部的内容外,还有自动化构件管理器等工具，使得专业编程人员能够开发功能强大的组骨子里分布式应用程序。随着版本的提高，ViｓuａlBasic的功能也越来越强。自从5。0版，ＶisualＢａsic推出了中文版,与前个版本相比，其功能有了很大提升.但是,功能再强大,ViｓuａlＢasiｃ仍然有一个缺点：在没有MＳVBＶM＊＊。DLL的计算机上必须安装所需的DLL文件(同样VｉsuａlC++在没有MSVCRT*。DLL情况下亦无法运行）。不过在Ｗiｎｄows2０00之后,这个DLＬ就被预置到操作系统中了，一般来说，程序如果只使用了VB内部的控件和对象,基本上不会有太大的问题.在２1世纪初，Micrｏｓoft公司推出VisｕalStudiｏ.NET２０03，它与ＶｉsualBasic之间有了重大变化，ＶｉsualStuｄio为各种编程工具做了一个平台，Viｓｕa可在这种平台上运行。相对于传统VＢ，有很大的不同。ＶB。Neｔ首次使用.Net构架进行可视化编程,并且能很好地与ＣOM构架兼容,ViｓｕaｌStｕdio．NET20０3应用．NETFrａmework1.1。20０５年VisｕaｌStudiｏ20０5则运用了ＮET2.0的技术，更加的方便了程序员的工作。可是新的程序对系统配置要求也较高,需要微软.NetFramｅwork２.０以上的.Net构架支持。2０07年１2月,微软（Ｍicroｓoｆｔ)推出了VisualＳtudio2０08Beｔａ2发生了重大的变化（见附图）在代码输入的时候,可以比VB２005快很多,在非特殊的情况下，VＢ2００８都会自动开启自动完成关键字这个命令而且支持最新的．NETＦｒamework3。５SP1Beｔa微软开发了一系列有关ＶB的脚本语言:VisuａｌＢasｉｃforAｐplｉcatｉoｎｓ,即VBA，包含在微软的应用程序中（比如MicｒｏsoｆｔＯffiｃe),以及类似WoｒｄPeｒfｅctOｆfiｃe这样第三方的产品里面。VBA这样嵌入在各种应用程序中看起来有些矛盾,但是它的功能和VB一样强大.VBＳcrｉpt是ＡＳP的默认语言，还可以用在Wｉndowｓ脚本编写（ShellScript)和网页编码（ＨＴMＬ）中.尽管它的语法类似于VＢ,但是它却是一种完全不同的语言。ＶＢS不使用VB运行库运行，而是由Windoｗｓ脚本宿主(wsｃript。exｅ—ＭｉcrｏsoftＷinｄowsＢaｓｅdＳcriptHｏsｔ）解释执行。这两种语言之中的不同点影响ASＰ网站的表现。当微软准备开发一种新的编程工具的时候,第一决定就是利用最抢手的VＢ6来进行修改,或者就是重新组建工程开发新工具。微软后来开发了VB的继任者ViｓuａlBasｉｃ。NET,同时也是。NET平台的一部分。VB.ＮET编程语言是一种真正的面向对象编程语言（VＢ4—VB６只能称为基于对象而不是面向对象，最明显的特征就是ＶB4—VB6都不支持类的继承),和传统VｉsuaｌBａsic并不完全兼容.[2］２多媒体播放器的开发设计2.１设计要求内容：多媒体播放器是根据计算机用户使用系统时的实际需求而开发，完全能够实现用户对计算机多媒体文件的查询和播放.要求：根据多媒体播放器的要求，要求系统具有以下功能：选取多媒体文件；播放多媒体文件;停止播放多媒体文件；打开字幕功能；关闭字幕功能；打开CD驱动器功能；关闭ＣD驱动器功能;添加播放列表功能。2．2设计方案WindｏｗsMｅｄiaPlayer控件(ｍsｄxm．ocx)支持的文件类型比较丰富，可以播放WAV、MID、MP3、WMA、AIＦ、ASF、MPEG、MPＧ、AVI、ＭOV、DＡT、ＲMI等多媒体文件。在ＶＢ6．0ＳP5下利用这个控件实现自动连续循环播放以及启动时自动从上次退出时的文件处继续播放多媒体文件的技术。多媒体技术的基本工作原理是：多媒体终端通过不同接入层网络(固定NGN、移动NGN、Iｎternet),接入传输层IP分组网络，在控制层IMS/ＳofｔSwitch等SIPPrｏxy设备的控制下，通过业务层的逻辑控制实现多媒体业务及应用。其结构下图所示:图1多媒体结构图ＭＰｌayer是一款开源的多媒体播放器,以GNU通用公共许可证发布。此款软件可在各主流作业系统使用，例如Ｌinux和其他类Ｕniｘ作业系统、微软的视窗系统及苹果电脑的MacＯSＸ系统。MＰlayer是建基于命令行界面，在各作业系统可选择安装不同的图形界面。MPlayer是Lｉnux上的最强大的电影播放器（也能跑在许多其它Unixｓ上，甚至非x86CPU上）。如今它也有了在微软视窗操作系统和苹果MaｃOS中的版本。它能使用众多的本地的,XＡnim，RealPlａyeｒ,和Wiｎ３2ＤLL编解码器，播放大多数MＰEG，ＶOB,AVI，OGG，VIVＯ,AＳF/WMV，QT/ＭＯV，ＦＬI,RM，NuppｅlVideo，yuｖ4mpeg，FILM，RｏQ文件.你还能观看VidｅoCＤ,SＶCＤ，DVD，３ｉvｘ,ReａlMedｉa，和DｉｖX格式的电影(你根本不需要aｖｉfｉｌe库)。MPlayer的另一个大的特色是广泛的输出设备支持。它可以在Ｘ11,Xv,DＧA,ＯpｅｎGL,ＳVＧAlib，ｆｂｄev,AAlib，DiｒeｃtFB下工作，而且你也能使用GGI和ＳDL（由此可以使用他们支持的各种驱动模式）和一些低级的硬件相关的驱动模式（比如Matｒｏx,3Dfｘ和Rａｄeon,Maｃh64，Peｒmｅdia3).他们大多数支持软件或者硬件缩放，因此能在全屏下观赏电影。MPlａyer还支持通过硬件MPEＧ解码卡显示,诸如DＶB和DＸR3与Hollywｏod+。可以使用Europeａn/ISO８859—1,2(匈牙利语,英语,捷克语等等）,西里尔语，韩语的字体的清晰放大并且反锯齿的字幕(支持１0种格式），和oｎsｃｒeendｉsplaｙ（OSD）。MPlayeｒ是Liｎux上一款非常优秀的电影播放器，能够播放大多数视频文件，如MPEG,VOB，AVI,OＧG，VIVO,ＡSF/WＭV，QT/MOV，ＦＬI,RM，ＮuｐpelVidｅo，yuｖ4mpeg,FＩLＭ，RｏQ等。而且它的另一个优点是可移植性好,现在常用的微软的Wｉｎdows平台和苹果的Maｃ平台都有它的身影.不仅如此，Ｍｐlaｙer还可以移植到很多非X86的平台上。２。3基本原理MＣI(媒体控制接口）是Microsｏfｔ公司为实现Wiｎdows系统下设备无关性而提供的媒体控制接口标准。用户可以方便地使用MCI控制标准的多媒体设备。ＭCI包含在Windowｓ多媒体扩展的MMＳYSTEM模块中，用来协调事件间以及MCI设备驱动程序间的通讯，提供了与设备无关的接口属性。通常应用程序是通过指定一个MＣI设备类型来区分ＭCI设备,设备类型指明了当前实际使用设备的物理类型，不同的设备类型使用不同的控件属性来进行描述（见附表１）。从使用的控制方式上来说,MＣI设备分为复合和简单两类。一个简单MCI设备并不需要设备元素。例如，CD音频和音碟机就是在一个已经安装好了的硬盘上工作的，它们不需要应用程序为其操作的媒体内容提供任何信息.但对于复合的MCＩ设备，就需要应用程序提供设备元素，即一个包含全部路径名的源数据文件或目的文件。ＶiｓualBaｓiｃ语言的CuｓtoｍControｌ（用户控制部件)概念体现了当今软件设计的发展潮流－-面向对象技术，编程者可以在VisualBasic的工具箱（Toolboｘ）中嵌入各式各样五花八门的用户控件，每个用户控制部件都有一定的属性和操作方法，编程者通过属性的设置和方法的控制完成特定的功能。为了方便地控制多媒体,在专业版ＶisｕaｌＢａsic工具箱中提供了一个用于多媒体目的的用户控件—-MＣI。OCX。多媒体MCI控件MＣI.ＯＣX专用于对多媒体控制接口MCＩ设备的多媒体数据文件实施记录和回放，从目的效果上来说，该控件通过一组按钮来发出种种设备控制命令以实现对诸如:音频面板、ＭIDI音序器、ＣD-ROM驱动器、音频CD播放机、录像带播放、录音带录放等设备的控制。在ＶisｕalＢａｓiｃ程序设计时,当在表中加入多媒体MCI控件时（在工具箱内双击MCI控件）,则出现下列按钮群：向前(Pｒev）、向后(Nexｔ)、播放（Ｐｌaｙ)、暂停（Pause）、返回(Baｃk)、单步(Ｓtep）、停止（Stop)、记录(Record)和出带（Eject)。应用程序对MCI的这组按钮操作非常灵活方便,如当我们打开一个ＭCI设备后，就可以根据该设备类型的属性随时从控件中选择合适的状态按钮来表示即刻设备的物理状态.所有ＭCI控件可以有下列几种方式来编程:⑴控件及其各按钮的可见性和使能性;⑵可变或完全对控件进行重新定义；⑶在一个窗口表格中可以同时控制多个设备。在ＶisuａlBａsｉc3.０专业版中,多媒体控件MCI。OＣX（在VisｕalBaｓic3．０和4.0中，多媒体控件的扩展名为。VＢX)是作为可选用部件提供的.为了使用它，首先要执行Ｆiｌe菜单命令,把Ｗｉｎdowssｙstｅm目录下的ＭCI。OCX加入到工具箱（Toolbox)中,这时会在工具箱中出现相应的MCＩ.OＣX图标。如果使用的是VｉｓuaｌBasic4.0版（或5。0版）,选择ooｌｓCusｔｏmCｏntrolｓ菜单或直接键入Ｃtrｌ＋T，即可出现对话框,在ＡvａｉlａｂleCｏｎtroｌｓ列表框中选中MicrosｏｆｔMuｌｔimediａContｒoｌs条目旁边的检查框，同样会在工具箱中出现MCＩ．OCX图标.

双击工具箱中的多媒体控件MCI.ＯＣＸ图标，调用ＭCI。OCX控件之后，表单FOＲM中将出现一排灰色的媒体控制按钮(九个）。多媒体控件ＭCＩ.OCX包含有一组高级的与设备无关的控制命令。在使用该多媒体控件时，首先用OＰEＮ命令打开MCI设备（多媒体设备)并建立一个与之对应的文件，以便来进行录或放等操作（但是对诸如ＣDＡudio、VＣＲ和录像带不能使用相应文件）。一旦设备打开成功，就可以向它发出各种操作命令(见附表的按钮命令）来完成指定的工作任务。最后记住，要用Ｃｌose命令来关闭设备和数据文件。ﻫ使用MＣI．OＣX来进行多媒体应用程序开发是很方便的，因为大多数属性都是容易理解的,其中Command属性尤为重要,它是在运行过程中向多媒体设备发命令.格式为：

ｍand＝cｍdｓtring$

其中，ｃmｄstｒｉng$变量是如下可执行命令名:Open、Close、Play、Pause、Sｔｏp、Bacｋ、Steｐ、Prｅv、Next、Seek、Recoｒd、Eject、Soｕnd和Ｓａｖe。一旦给其命令设置,它就立刻执行,所发生的错误存在Error属性中。

下面以播放DＥMO.WAV（波形文件)文件为例，说明VｉsualBasic多媒体应用程序设计步骤。

首先,创建一个包含有多媒体控件(MCI.ＯCX)的表格（Foｒｍ),于是屏幕上显示出形状类似录音机的控制键,不过这时多媒体控制部件是不能马上拿来用的（各键呈灰色）,须通过程序代码来改变键的状态。

其次，在Form_Lｏad过程中,插入相应程序代码。如下ﻫSｕbFoｒm_Loａd（)ﻫ‘在发出ＯPEN命令前要设置多媒体设备的属性ﻫFｏrm１．MＭCoｎtrｏl1.Ｎotify=ＦalsｅﻫFｏrｍ1.MMＣontｒol1.Waiｔ=Trｕe

Ｆoｒm1.MMContｒoｌ１.Shareable＝False

Forｍ1.MMＣontroｌ１．DeviｃeTyｐe="WaveAudｉｏ"ﻫFoｒm１。MMＣontrｏl1。"c:windｏwss

Mmdataｄeｍo.wav"

mａnｄ=”Ｏｐｅn"

EndSub3设计方案的实现3。１自动连续循环播放多个文件通过对通用对话框控件（COMＤLG3２.OCX）的有关属性进行设置，可实现按选择的文件类型在列表框中显示符合条件的文件，用户可在该列表框中显示符合条件的文件，用户可在该列表框中选择一个文件，或选择连续或不连续的几个文件,若选择了多个文件,则按顺序连续循环播放。开始播放后，组合框和窗体的标题栏同时显示正在播放文件的文件名。3.２自动记忆播放目录和正在播放的文件的路径退出播放器时，程序自动将用户选择的目录保存到Ｗindｏws的注册表中，以便下次选择要播放的文件时,在打开对话框中，直接显示的是上次选择的目录。同时，自动将用户选择的文件清单保存到文件中,以便下次启动该程序时，可以直接从退出时正在播放的那个文件开始继续播放,这样就能实现每次启动播放器，首先播放的是上次退出时播放的那个文件。这样做就使程序具有了记忆功能。３．3用户自定义播放顺序单击下一首按钮，开始播放下一个文件，单击上一首按钮，开始播放上一个文件。单击暂停按钮，则播放器暂停播放，同时暂停按钮变为开始按钮，单击开始按钮，播放器从暂停处继续播放,同时开始按钮恢复为暂停按钮。单击组合框右边的下拉箭头,可以看到正在播放的文件列表，要想换一个文件播放,直接单击文件名即可。用户也可以直接打开播放列表文件,用文本编辑器编辑播放文件的顺序.程序代码4。1界面布局设计新建一个窗体Foｒml,在上面画一个组合框Ｃomｂｏｌ,设置其Stｙle属性2—DｒｏpｄowｎList，画五个命令按钮（打开、暂停、关闭、上一首、下一首）,一个通用对话框(ＣommonDｉａlog）控件,一个媒体播放器(WinｄowｓMeｄiaPlaｙer)控件.调整好控件在窗体中的位置。4。2系统初始化PrivateDｅcｌaｒeFuｎctioｎGetSystemDiｒectoｒyLｉb″Ｋｅrnｅl32″Aliaｓ″GetSｙｓtemDirectｏryA″（ＢyVaｌpBｕffeｒAsSｔrｉｎg，BｙVａlnSizｅAsＬoｎg)AsLong返回Ｗｉｎ２ｄｏwｓ\systｅｍ所在的文件夹PrivateＷinSysＰaｔhAsStｒｉnｇPrivateSelectFＮame（１0００）AsStｒingＰrｉｖateＳelｅｃtNｕmAｓIｎtｅger，ＮeｘtPlayingAsIntegerＰrivatｅPrｅｖiousPathＡsString此变量保存用户上次选择的目录,其值保存在Ｗｉndows注册表中4．3自动从上次退出时的文件处继续播放要实现此功能,可以在窗体的Load事件中编写如下代码：Diｍtmp1AsＳtrｉngDiｍtｍp2ＡｓIｎｔegerMｅｄiaPlayｅr1.AutoRewind=ＴrueMediaPlａyｅr1．AutoSｔａｒｔ=TrueＭｅdiaPlayer１．ShｏwStatuｓＢar=ＴｒueＭediaＰlａyeｒ1。SｈｏwDisplay=TｒuｅMediaＰlayｅｒ1．AutoSize=ＦaｌseＣｏmbo１.Ｌocｋed=ＦaｌsePreviｏuｓPath=GetSetｔiｎg(″ＭyＰｌａｙer″,″PlaｙMM″，″LaｓtPath″，″NoDaｔa″)以下代码将上次选择的多媒体文件(保存在ＷiｎSｙsＰａtｈ中)读出来,放SｅlectFNaｍe数组中,并开始播放tmｐ１=Spａce(2６0）tｍp2=GetSysｔeｍＤirectｏry（tmp1，Len(ｔmp1））ＷｉnＳysPath=Ｌeｆt(tmp1,ｔmｐ2）ＷinSyｓPaｔh=WingＳｙｓPath+″\Iｎｖｅｎtｏｒy.tｘt″Inventory.txｔ文件保存正在播放文件的列表。ＯｎＥrｒoｒGoＴoErｒhandｌerSeｌectNuｍ=0ＮeｘtPlaｙinｇ=－１OpｅnWinＳysPaｔhFｏｒＩｎpuｔAs#1DｏＷｈileNotEＯF(１）LinｅInput#1,SｅlectFName（SelectNum）＼CｏｍbｏL．AddｌtemMｉｄ（ＳelｅctFNaｍｅ（Ｓelect2Ｎum），ＩｎStrRev（SelectFＮaｍe（SｅｌｅctＮｕｍ），″\N）+１）ＳelectＮuｍ＝SelｅctNuｍ+1LｏoｐCｌose＃１MediaPlayｅrlEndOfＳtrｅam(0&）Errhandlｅr:ＩfComｂoｌ.LiｓtCount=0Tｈen′Invenｔoｒy.tｘｔ文件不存在或播放列表为空Combｏl。Liｓt(0）=“没有可选项目”EndIfCｏmｂｏl．Ｌiｓtlｎdeｘ=0４。4选择播放序列ＰriｖatｅSｕbＣｏｍmanｄ1Ｃlicｋ(）DimFＮameAsSｔrinｇＤｉmiAsIｎteｇeｒ，jAsInｔegerDimTｈePathAｓSｔｒingDｉmｔmｐAsStｒingCｏmmonDｉalog1。ＣancelErrｏr=TruｅOnErｒorＧoＴｏEｒrhandler允许多选，所有选择的文件名之间用空格分隔，保存在中ComｍonＤialｏgl。Flags=cdlOFNＡｌlowＭultisｅlectCｏmmoｎDialogl.InｉtＤｉr＝IIｆ（ＰｒeviouｓPath=″o２Data″，″C：\WＩNＤＯＷS″,ＰrｅｖiｏuｓPatｈ)CoｍｍoｎDｉalogl。Filter=″3。mpeg｜3.mpeｇ|3.mpg|3.mpg|３．avi|３3.AVI｜３。wav|3。WAV|3.mid｜3。MID|３。ｍp3｜3。MＰ３|3。ｍov｜3．ＭOV|3.ｄａｔ|３．ＤAT｜3.RＭI|３.rmi|3。3|3.3″CoｍmｏnDｉaｌogl．Max=32767当同时选择许多文件时默认的260放不下,故要大点,这是最大的值CommonＤialog１．ＳhｏwOpenＦName＝CommｏnDｉalogl。下面代码将选择的若干文件名分开,放在数组SelecｔFName中ＩfInStr（FNａme,Chr(32）)=0Ｔhen′若只选择一个文件,FNamｅ中没有空格,否则文件名之间用空格分隔,若文件在根日录，则路径形如E:\,否则形如E：＼abc\１2３SelｅctNuｍ＝1SｅｌｅctFＮamｅ（0）=ＦNameTｈePath=Ｌｅｆt(Fｎamｅ,InＳtrRev(Fname,″\″）—１)EｌsｅThePaｔh=Left（ＦNａme，ＩnＳtr（FNamｅ，Chｒ(32）)－１）+″\″FName=Mid(Fname,InStr（Ｆnaｍe，Chr（３2)）＋1)ＳｅleｃtNum=０J=1ｔmp=Spaｃe(0)Foｒｉ=1ToLen（FＮａｍe）IfＭiｄ（FＮame,i,１)＝Ｃhr(32）TｈenSｅlecｔFＮame（SｅlｅｃtＮum）＝ＴｈeＰatｈ+ｔmpSｅlectNｕm=ＳeleｃtＮum+1tmｐ=Spａce(0）Ｅlsetｍp=tmp+Ｍiｄ（ＦNamｅ,i，１）ＥndIｆＮextiSelectＦNamｅ（SeｌｅｃtＮum)=ThePａｔh＋ｔmｐSeｌectNum=SelecｔNum＋1EndIf’分隔结束Cｏmｂol．ClearＦori=0ToSelｅctNuｍ-1此循环将选中的文件显示在组合框中Combｏl．AddｌtemＭｉd（SｅlectFNamｅ（ｉ)，Ｉn2ＳtrRev(SelｅｃｔFNamｅ(i），″\″)+1）NｅxｔｉCombol．Listlnｄeｘ=0NextPlaｙｉng=0Me.Capｔｉｏｎ=Cｏmboｌ．TextMedｉaPlayeｒl。＝SelｅｃtFName（0)SaveSettinｇ″MyPｌａｙer″，″ＰｌaｙMＭ″,″LaｓtＰａth″，″ThｅPath″Eｒrhａｎｄler:EｎdSub4。5暂停播放PrivatｅSubCommaｎｄ2Cｌick（)IｆＣｏmmanｄ2.Captioｎ=“暂停”ＴhｅnCｏmmａnd2．Cａｐｔiｏｎ=“开始”MedｉaPｌaｙerl.ＳtoｐElseComｍand2．Caｐtioｎ=“暂停”MｅdiaPlayerl．ＰｌayEndIfEnｄＳuｂ4.６关闭播放器退出之前，将用户选中的文件保存起来，以便下一次启动该程序时，可以直接从保存时的文件开始继续播放,为了做到这一点,在将播放列表写入文件时，必须让正在播放的那个文件首先写入文件中,然后是它后面的,到底后再绕回来，按这个顺序写入。因为程序启动后,是按文件电的列表顺序从前向后进行播放的，故每次启动都省先播放的是退出之前播放的那个文件。PrivateＳubComｍａｎd3Click（）DimｔmplAｓInｔｅｇｅrOnErｒoｒGｏＴoＥrｒhaｎdleｒtmp1＝0OpeｎＷiｎＳysＰａtｈFｏrOutputAs＃1DoＷｈｉletｍpl〈ＳelｅｃtNｕmPｒinｔ＃1,SeｌｅctＦNａmｅ（ＮexｔPlａｙinｇ）tmp1＝tmp１+1ＮextPlaying=（NexｔPlayinｇ+1）ＭｏｄSｅlect2NumLoｏpCｌosｅ＃IEｒrhandler：UnｌoaｄMeEndSｕｂ４。7上一首PrivateSubCoｍmandoClｉcｋ（yNｅxtPlaying＝ＩIf（NextＰlaying-1〈0，Seｌecｔ2Ｎuｍ—2，NextPｌaying—２）ＭedｉａＰlaｙerl-EndOfStｒeａm（０&)EndSub4.８下一首PｒｉｖatｅSｕbCommandｓＣlｉｃk(）MediａPlayerlEndOfStｒｅaｍ(0&)ＥndSｕb4．9在组合框中选择播放文件PrivaｔeSubCｏmbolClicｋ(）NextPｌａｙing＝Combol．Ｌistlndｅｘ-1ＭedｉaPlaｙeｒlＥndOfSｔrｅam（0＆)ＥndSｕｂ4。10卸载播放器PriｖaｔeSｕbＦorｍQueryUnloaｄ(CaｎceｌＡｓIｎte2ger，ＵnｌoadModｅＡsIｎteger)Cｏmmand3CliｃｋEｎdＳub4.11切换文件PｒｉvaｔeSubMediａPlayerl－ＥｎｄＯfStｒeaｍ(ＢyVal2ResultAｓLong）播放文件结束时触发此事件OnＥｒrorGoTｏEｒrｈａndlerNｅxｔPlaｙing＝（NextPlａying+１)ＭodSelecｔNumMeｄiａＰlayerl.=SelectFNａｍe(NexｔＰlayinｇ)Combol.Ｌistlndex=ＮextＰlayinｇMe.Caption=Combｏl.ＴeｘtＣoｍmａnd２。Enabled=TrueＣoｍｍａnd2.Captioｎ=“暂停”Eｒrhandｌeｒ:EndSub/／DynSｐｌiｔView２。ｃpｐ：imｐｌｅｍenｔaｔｉｏｎfｉlｅ//5运行结果Mｐlayer是我们所设计的多媒体播放器的核心，它支持的视频格式直接影响到整个播放器的性能。下面将从这方面入手，对它的性能进行必要的测试.Mplａyｅr的解码库是它支持的视频格式的决定因素。在Ｘ8６平台的Linux操作系统中，Mplayer拥有丰富的解码库，但是很大一部分都是以非开源的形式提供的。所以将Mplａyer移植到OＭAP3530平台后，仅仅有为数不多的几个开源的库可以继续使用.移植以后的Mplaｙｅr的视频解码器包括FFmｐegDiｖX/ｌｉbａvcoｄeｃ、liｂｍpeg2和XviD等比较常用的库，可以支持H263、MJPEG、RV10、DｉvX3、DiｖX4、DivX5、MP４1、MP42、WＭV1、WMV2、HufｆYＵＶ以及MPEG和ＡVI编码格式编码的视频流。而通俗的讲，常见的媒体类型，除了RＭ格式和QuiｃkＴｉｍｅ格式以外，移植后的Ｍpｌayｅr基本都可以支持的。下面是播放各种格式视频的截图:图2播放fｌv格式视频图3播放ａvi格式视频图4播放mｐeg格式视频图5播放mｐg格式视频6心得体会学习VB程序设计的方法保持良好的学习心态，要有自信,自强,积极主动学习．克服畏难情绪,树立学好程序设计的信心要有良好的学习习惯。VB程序设计的入门学习并不难,但却是一个十分重要的过程，因为程序设计思想就在这时形成的，良好的程序设计习惯也在这个阶段养成。学习程序设计要注重理解一些重要的概念。VＢ程序设计本身并不复杂，翻开一本程序设计学习的书籍,看到的无非就是变量,函数,条件语句，循环语句等概念．但要真正能进行程序设计，需要深入理解这些概念.因此，在程序入门阶段还是应该重视概念的学习.程序设计入门阶段要经常自己动手抄写或编写一些小程序,亲自动手进