求在VB中播放MP3音乐的代码解决方法

求在VB中播放MP3音乐的代码
我开发了一个程序，里面有一个按纽
我想在按下这个按纽的时候播放一段MP3
请问有这样的示范代码么？
谢谢

------解决方案--------------------
示例（Multimedia MCI 控件）
Visual Basic 示例

下面的示例演示了打开一台使用兼容数据文件的 MCI 设备的过程。将这些代码放到 Form_Load 过程，应用程序就可以使用 Multimedia MCI 控件来对文件 Gong.wav 进行 播放、记录和倒带。在试运行这个示例之前，首先应创建一个包含 Multimedia MCI 控件的窗体。

Private Sub Form_Load ()
' Set properties needed by MCI to open.
MMControl1.Notify = FALSE
MMControl1.Wait = TRUE
MMControl1.Shareable = FALSE
MMControl1.DeviceType = "WaveAudio "
MMControl1.FileName = "C:\WINDOWS\MMDATA\GONG.WAV "

'打开 MCI WaveAudio 设备。
MMControl1.Command = "Open "
End Sub

为了正确管理多媒体资源，在退出应用程序之前，应该关闭那些已经打开的 MCI 设备。将下面的语句放到 Form_Unload 过程，那么在退出包含 Multimedia MCI 控件的窗体之前，就可以关闭那些已经打开的 MCI 设备。

Private Sub Form_Unload (Cancel As Integer)
MMControl1.Command = "Close "
End Sub



------解决方案--------------------
楼上的好像只能播放wav文件
要想播放MP3单用vb是没有办法的
直接用windows 的mediaplayer控件或者去网上下一个mp3
播放控件，在vb中很容易实现MP3播放