用VB编了一个MP3播放器,但没声音

很简单的一个程序,

Private Sub Command1_Click()

CommonDialog1.ShowOpen

End Sub

Private Sub PLAY_Click()

Err = Mp3Play1.Open(CommonDialog1.FileName, 〃〃)

Mp3Play1.Play

End Sub

Private Sub PAUSE_Click()

Mp3Play1.Pause

End Sub

没声音,再好的戏也出不来,

请大家帮帮忙!!

你那有MP3解码程序的控件吗？

如果没有是不会有声音的