如何在运行程序的同时加上音乐?

来源：百度知道 编辑：UC知道 时间：2024/05/03 19:42:41
不要跟我说用控件实现.有API函数的吗?
说的是VB

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrRetumString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

mciSendString "open " & 短文件名 & " alias Joforn", 0&, 0, 0
mciSendString "play Joforn FROM 0", 0&, 0, 0

playsound()