En poursuivant votre navigation sur ce site, vous acceptez l'utilisation de cookies pour vous proposer des contenus et services adaptés. Mentions légales.

Recherche

Recherche

Les mémos

Je débute...

Visites

 1222954 visiteurs

 4 visiteurs en ligne

Nous contacter

Contact

FAQ

Déplier Fermer  Formulaire
Si l'on souhaite jouer un son à l'ouverture d'un formulaire ou sur tout autre événement, on placera le code ci-dessous dans un module général.


Option Compare Database
Option Explicit

'// Dans un module standard.
Public Declare Function PlaySound Lib "winmm.dll" _
                                  Alias "PlaySoundA" _
                                  (ByVal lpszName As String, _
                                   ByVal hModule As Long, _
                                   ByVal dwFlags As Long) As Long

Public Const SND_ASYNC = &H1          '  joue en asynchrone.
Public Const SND_FILENAME = &H20000   '  indique nom de fichier.


Puis, dans l'événement "Sur chargement" du formulaire on écrit :


// Dans un formulaire.
Private Sub Form_Load()
     PlaySound "C:MonDossierMonFichierSon.wav", ByVal 0&, _
                           SND_FILENAME Or SND_ASYNC
End Sub

Dernière modification :26/05/2009 : 03:35 Hyperlien 

Vous êtes ici :   Accueil » FAQ