Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

请问我用上面的API做背景音乐,如何判断当前的状态.是关闭还是打开等

在Form_unload()事件中写关闭音乐播放的代码
MciExecute "close " & FileName