Jouer un son en boucle
Soyez le premier à donner votre avis sur cette source.
Snippet vu 8 657 fois - Téléchargée 95 fois
Contenu du snippet
Comment jouer un Son en boucle ?
Mettez ce code dans un Module :
Mettez ce code dans un Module :
Source / Exemple :
Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long Public Const SND_ASYNC = &H1 Public Const SND_LOOP = &H8 ' Puis utilisez ce code pour jouer le son en boucle : MonSon = SndPlaySound "c:\MonSon.wav",SND_LOOP Or SND_ASYNC
Commentaires
Bonne continuation
J'ai essayé d'implanter cette fonction dans un petit programme. L'exécution du son se déroule correctement quand j'exécute le programme à partir du mode création de VB. Si je lance le programme à partir de l'exécutable créé, le son ne fonctionne pas. Quelqu'un a-t-il déjà rencontré ce problème ?
Merci beaucoup
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
(g pri ca sur le forum)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.