Discussion :

[julio26]

Salut tout le monde,
Je souhaiterais declencher une alerte sonore si la valeur d'une case depasse une certaine limite. Je ne sais pas trop comment faire. Pas besoin d'emettre un son personnalisé, un son windows suffirait. Si vous avez des idées, je suis preneur.
Merci d'avance.

[jfontaine]

Une solution très simpliste avec l'instruction Beep

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
'faire un son
 
Beep

[julio26]

Oui effectivement c'est simple !
Mais il n'y aurait pas une autre fonction qui fasse un bruit différent?
Merci !

[Commodore]

il existe une API Playsound...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Declare function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As long) As long
 
Dim ret
ret = sndPlaySound("C:\windows\media\chimes.wav", 0)

[julio26]

Merci beaucoup c'est exactement ce que je voulais !!!