mciSendString播放mid文件成功，但是在播放时候无反应！在线求救

http://community.csdn.net/Expert/topic/3480/3480184.xml?temp=.7852899
内容如下，解答了这里也送分

解决方案 »

  1.   

    Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As LongRetValue = mciSendString("OPEN D:\工作台\VB代码\mid文件播放\town.mid TYPE SEQUENCER ALIAS BackgroundMusic", 0&, 0, 0)RetValue = mciSendString("PLAY BackgroundMusic FROM 0", "", 0, 0)RetValue = mciSendString("close BackgroundMusic", 0&, 0, 0)累呀，自己研究出来了，送给大家，顶的送分
      

  2.   

    请教问题，如果想一个mid文件背景播放，而还需要一个文件在前台播放怎么办？
    mciSendString 的调用好像只能播放一个文件，怎么分开播放呀?