un .wav en fond sonor

Question

donc voila je galere un peu jai chercher sur la toile pour lire un .wav donc ca marche mais le probleme c'est que quand je ferme l'application la music reste (c'est un peu chiant ) donc voila le code: 

 Option Explicit

'Début
'-------------------------
Public Const SND_SYNC = &H0 ' Jouer synchrone (par défaut)
Public Const SND_ASYNC = &H1 ' Jouer en asynchrone
Public Const SND_LOOP = &H8 ' Répéter le son jusqu'au prochain son
Public Const SND_STOP = &H4 'Arrête le fichier son
Public Declare Function JoueMusique Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
'-------------------------
'Fin

Private Sub Form_Load()
'Début
'-------------
JoueMusique ByVal "D:\slt	est.wav", SND_ASYNC
'-------------
'Fin
End Sub

Et voila merci davance

cs_iclic · Answer

me suis apercu de ma betise dsl jai juste a marquer "SND_STOP" mais que pour quand on quitte le programme par la case en haut a droite voila a+

cs_iclic · Answer

oula encore dsl c'est le soir jmexprime mal je veut savoir quel est le code a marquer pour que si lutilisateur ferme l'application par la ptite croix en hau a droite la music sarrete
a+!cl!c encore dsl :sleepy)

cs_RDX · Answer

dans l'événement form_unload mets :


Private sub Form_Unload(Cancel as integer)
'Ton code pour couper le son ici
End sub

cs_DARKSIDIOUS · Answer

Ou alors, tu utilise une redirection vers une sub qui coupe le son dans le Form_Unload tout simplement ;)

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer

Un .wav en fond sonor

4 réponses

Discussions similaires