msdn CDROM里找找,有的.
或是www.microsoft.com
下面是一段
Private Sub MNU_OPEN_Click()
With Dialog1
    .DialogTitle = "Ñ¡ÔñÒª´ò¿ªµÄÎļþ"
    .Filter = "mp3 Îļþ|*.mp3|wav Îļþ|*.wav|VCD Îļþ|*.dat"
    .ShowOpen
End WithIf Dialog1.FileName <> "" Then
    MPlayer.Open Dialog1.FileName
End IfEnd SubPrivate Sub mnu_playerCD_Click()
MPlayer.FileName = "cdaudio:"     '<------注意这里
MPlayer.Play
End Sub

解决方案 »

  1.   

    上面第二行写错了,是:www.microsoft.com/china/msdn
      

  2.   

    首先你的光驱要有一根音频线连到你电脑的声卡上,(最新的超级解霸可以不用这根音频线,因为它用到了DirectCD技术)
    用到WIn32APi函数MciSendString 发送 mci 命令
    "Close MyCdplayer"
    "Open " & FileName & " Alisa MyCdplayer"
    "play MyCdplayer"
    具体的程序请看王国荣的《Vb 与  Windows32 Api 讲座》
      

  3.   

    谢谢!但我只想用Media Player控件播放CD音轨,因为一些其他因素制约。我见过有人实现过,哪位老大知道的帮帮忙把!给段代码,用MediaPlayer1播放Track03.cda。谢了!先给出并且有效的定给分。