Как остановить музыку
Вот мой проект.Мне надо, чтобы музыка остановилась.
Private Declare Function MuzloPlay Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Private Sub Command1_Click()
MuzloPlay "Имя файла", 1
End Sub
Private Declare Function MuzloPlay Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Private Sub Command1_Click()
MuzloPlay "Имя файла", 1
End Sub
