Jouer un son en boucle

Soyez le premier à donner votre avis sur cette source.

Snippet vu 8 617 fois - Téléchargée 95 fois


Contenu du snippet

Comment jouer un Son en boucle ?

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

A voir également

Ajouter un commentaire

Commentaires

bonjour,
sur ce site, j'ai trouvé comment lire des MP3 comment lire des wavs en boucle mais peut-on lire des mp3 en boucle ? merci.
et comment on fait pour arreter le son?
voici d'autre constantes utilies pour les wav !!!!!!!!

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)
arnaudden
Messages postés
1
Date d'inscription
vendredi 9 juin 2006
Statut
Membre
Dernière intervention
20 juin 2006
-
Bonjour,

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
monrak
Messages postés
1
Date d'inscription
samedi 19 février 2005
Statut
Membre
Dernière intervention
27 octobre 2006
-
Verifie le chemin de ton fichier son si il est le meme que le chemin de création de ton app .
Bonne continuation

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.