Jouer un wave

Description

bon, tout d'abord je voudrais dire que j'ai esseyer plusieurs source et qu'il ne marchais pas..alors j'ai fais en fin une source qui marche vraiment...

pour ce "truc" enfin je veux cette source il vous faut :
- un formulaire (tout simplement)
- et un son Wave nommé "test.wav" que vous placer dans la racine du disque dur "c:\" (je m'exprime clairement pour les débutants...).

et hop c parti pour le code>>>>

Source / Exemple :


'*********************************
'**Dans un module, mettez ceci :**
'*********************************

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Public Sub Playwav(WavFile As String)
    Dim SafeFile As String
    SafeFile$ = Dir(WavFile$)
    If SafeFile$ <> "" Then
        Call sndPlaySound(WavFile$, SND_FLAG)
    End If
End Sub

'**********************************************
'**Et dans le code du formulaire mettez ceci:**
'**********************************************

Private Sub Form_Load()
    Playwav "c:\test.wav"
End Sub

Conclusion :


Voilà...c tres simple...

Bye bon code !! :)

Codes Sources

A voir également

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.