MP3播放器大家用得应该不少，不过，您是否厌倦了播放器的老面孔，是否尝试编写一个自己的MP3播放器呢？什么，太复杂!你会VB吗？会就得了！ 首先，得了解一下我从朋友处得来的一个ActiveX控件——Mp3Play.ocx。所谓ActiveX控件就是高手早已编好的专门化功能软件部件。以前在16位VB中是以vbx作为扩展名，Win95中扩展名改为ocx。大家只要知道Mp3Play.ocx是一个专门播放MP3音乐文件的VB控件就行。我们编写自己的播放器，使用该控件，并适当设置其属性，就可以获得专业级的MP3音乐效果。要想使用该控件，最好将它放到Windows\system目录,并且在注册表中注册。利用该控件，还可以将一个MP3文件解码为一个W***文件。 Mp3Play.ocx的主要属性有：
BitRate ：MP3流比特率；FrameCount：MP3流帧记数；TotalTime： 总计已播放的时间；FrameNotifyCount( RW )：发送一次通告的帧数，缺省为32；IsCopyrighted、IsOriginal、HasChecksums： 从MP3流获得的发行信息；SampleFrequency：采样率；Layer：取值可以为1、2、3，分别代表Layer1、Layer2、Layer3的标准，缺省为3，这意味着MPx的文件都可以播放；MPEGVersion：取值代表MPEG－1或MPEG－2。 常用的方法有：
AboutBox ( )：显示About框。
Authorize ( Name, Password )：验证许可证（注册码），Name即注册名，Password为注册码，由控件的提供商在用户注册后提供，返回值为0则通过，否则为5。 Open ( Inputfile, Outputfile )：打开MPEG音频文件并解码播放，若在声卡上播放则Outputfile应为空串，返回非0值表示解码有误。如果Outputfile为文件名则解码至W***文件。也就是说，可以利用此方法编写MP3－W***转换器。 Close：关闭当前MPEG流解码。
GetVolumeLeft,GetVolumeRight：获取左右声道的音量，返回Long型值。 SetVolume ( left channel, right channel )：设置系统左右声道音量。 Pause( )：暂停，奇次声音暂停，偶次开启。
Play ( )：开始解码，并播放当前MPEG文件，返回0表示解码无误。 Stop( )：停止当前解码工作，返回非0表示有误。
下面，我们一步一步地完成：
1． 添加Mp3Play.ocx控件
启动VB5,选择Standard EXE。此时，左边的控件面板中只是一些Win95标准控件。我们选Project（工程）菜单下的Components...(组件)项，在弹出的对话框中选中Dialog－Medien Mp3Play ActiveX Control Module项。这“宝贝”即我们所需的MP3控件。确定后在控件面板中会增添一个蓝色的喇叭图标，表示该控件已经添加到控件面板中。 2． 设置属性
点中蓝色喇叭，在窗体中拖动一个矩形框，松开后在窗体中出现MP3控件图标。为了在播放时隐去喇叭，在MP3Play1的属性表中将Visible设为False。一般就这么多，剩下的就是使用它的方法(Methods)了。 3． 添加按钮
点中“Command”按钮，在窗体中建立三个名字分别为Command1、Command2、Command3的命令按钮，将它们的Caption分别设为“选择MP3文件”、“播放”、“暂停”。 4． 添加CommonDialog控件
为能方便地选择MP3 文件，还需文件打开对话框。如果控件面板中没有此控件，如1中所述选中Components菜单项，在Microsoft Common Dialog Control 5.0前的复选框中打勾，确认后即可在控件面板中看到此控件图标。在窗体中建立一个名为CommonDialog1的对象，为使能快速找到MP3的文件，需要设置它的Filter属性为“.MP3|.MP3”。 5． 在按钮中编写相应的代码
双击Command1，在Private Sub Command1_Click()中输入以下代码： CommonDialog1.ShowOpen
双击Command2，在Private Sub Command2_Click()中输入： Err = Mp3Play1.Open(CommonDialog1.filename, ″″) Mp3Play1.Play
双击Command3，在Private Sub Command3_Click()中输入： Mp3Play1.Pause
6．调整窗口大小，运行播放器
适当调整窗体的外观，如大小、颜色等，怎么舒服您就怎么设置。好了，开始按F5运行，选择MP3文件——播放！感受一下您自个儿的MP3播放器吧！ 此外，您还可以用Photoshop等软件制作一些漂亮的界面，贴在窗体上，增强其艺术性。还可以仿照Winamp的“Plug_ins”，利用Timer控件完成一些特殊的动画效果。当然，一切都靠您自个的天才去设计了。顺便在此请教诸位大侠，哪儿有未加时间限制的Mp3Play.ocx，或者您有注册号，请告诉在下。我因没有注册码，每首歌曲只能播放30秒
BitRate ：MP3流比特率；FrameCount：MP3流帧记数；TotalTime： 总计已播放的时间；FrameNotifyCount( RW )：发送一次通告的帧数，缺省为32；IsCopyrighted、IsOriginal、HasChecksums： 从MP3流获得的发行信息；SampleFrequency：采样率；Layer：取值可以为1、2、3，分别代表Layer1、Layer2、Layer3的标准，缺省为3，这意味着MPx的文件都可以播放；MPEGVersion：取值代表MPEG－1或MPEG－2。 常用的方法有：
AboutBox ( )：显示About框。
Authorize ( Name, Password )：验证许可证（注册码），Name即注册名，Password为注册码，由控件的提供商在用户注册后提供，返回值为0则通过，否则为5。 Open ( Inputfile, Outputfile )：打开MPEG音频文件并解码播放，若在声卡上播放则Outputfile应为空串，返回非0值表示解码有误。如果Outputfile为文件名则解码至W***文件。也就是说，可以利用此方法编写MP3－W***转换器。 Close：关闭当前MPEG流解码。
GetVolumeLeft,GetVolumeRight：获取左右声道的音量，返回Long型值。 SetVolume ( left channel, right channel )：设置系统左右声道音量。 Pause( )：暂停，奇次声音暂停，偶次开启。
Play ( )：开始解码，并播放当前MPEG文件，返回0表示解码无误。 Stop( )：停止当前解码工作，返回非0表示有误。
下面，我们一步一步地完成：
1． 添加Mp3Play.ocx控件
启动VB5,选择Standard EXE。此时，左边的控件面板中只是一些Win95标准控件。我们选Project（工程）菜单下的Components...(组件)项，在弹出的对话框中选中Dialog－Medien Mp3Play ActiveX Control Module项。这“宝贝”即我们所需的MP3控件。确定后在控件面板中会增添一个蓝色的喇叭图标，表示该控件已经添加到控件面板中。 2． 设置属性
点中蓝色喇叭，在窗体中拖动一个矩形框，松开后在窗体中出现MP3控件图标。为了在播放时隐去喇叭，在MP3Play1的属性表中将Visible设为False。一般就这么多，剩下的就是使用它的方法(Methods)了。 3． 添加按钮
点中“Command”按钮，在窗体中建立三个名字分别为Command1、Command2、Command3的命令按钮，将它们的Caption分别设为“选择MP3文件”、“播放”、“暂停”。 4． 添加CommonDialog控件
为能方便地选择MP3 文件，还需文件打开对话框。如果控件面板中没有此控件，如1中所述选中Components菜单项，在Microsoft Common Dialog Control 5.0前的复选框中打勾，确认后即可在控件面板中看到此控件图标。在窗体中建立一个名为CommonDialog1的对象，为使能快速找到MP3的文件，需要设置它的Filter属性为“.MP3|.MP3”。 5． 在按钮中编写相应的代码
双击Command1，在Private Sub Command1_Click()中输入以下代码： CommonDialog1.ShowOpen
双击Command2，在Private Sub Command2_Click()中输入： Err = Mp3Play1.Open(CommonDialog1.filename, ″″) Mp3Play1.Play
双击Command3，在Private Sub Command3_Click()中输入： Mp3Play1.Pause
6．调整窗口大小，运行播放器
适当调整窗体的外观，如大小、颜色等，怎么舒服您就怎么设置。好了，开始按F5运行，选择MP3文件——播放！感受一下您自个儿的MP3播放器吧！ 此外，您还可以用Photoshop等软件制作一些漂亮的界面，贴在窗体上，增强其艺术性。还可以仿照Winamp的“Plug_ins”，利用Timer控件完成一些特殊的动画效果。当然，一切都靠您自个的天才去设计了。顺便在此请教诸位大侠，哪儿有未加时间限制的Mp3Play.ocx，或者您有注册号，请告诉在下。我因没有注册码，每首歌曲只能播放30秒
