播放音乐

播放音乐文件的命令是什么，忘记了

解决方案 »

  1.   

    Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
    Const SND_ASYNC = 1
    Const SND_FILENAME = &H20000PlaySound wav文件路径, CLng(0), SND_ASYNC Or SND_FILENAME
      

  2.   

    MP3可能要用多媒体控件的函数了,就是那个MMC控件的
      

  3.   

    在部件中添加“Windows Media Player”控件
    然后在程序中设置如下即可播放你要插放的歌曲：
    Media.URL = App.Path & "\xxx.mp3"如果你要播放多个mp3，可以先创建一个m3u列表文件，然后设置如下：
    Media.URL = App.Path & "\list.m3u"m3u文件格式如下（每个文件地址独立一行，你可以用程序自动生成，也可以用记事本手工写）：mp3文件1完整文件地址
    mp3文件2完整文件地址
    mp3文件3完整文件地址
    mp3文件4完整文件地址