émettre un son d'une fréquence déterminée (ex: 852 htrz)

Je sais qu'il existait une fonction sous q-basic qui le permettait (SOUND) mais j'aimerais faire le même en VB avec un API ... j'ai essayé avec
"Beep" de kernel32.dll mais il produit trjs le son par défaut ... pouver-vous m'aider SVP
Merci
Schouly@Skynet.be

si tu as trouvé tu peux me dire please '


-------------------------------
Réponse au message :
-------------------------------

Je sais qu'il existait une fonction sous q-basic qui le permettait (SOUND) mais j'aimerais faire le même en VB avec un API ... j'ai essayé avec
"Beep" de kernel32.dll mais il produit trjs le son par défaut ... pouver-vous m'aider SVP
Merci
Schouly@Skynet.be

mailto:S0KARISS@hotmail.com
voila comment on fait
Option Explicit
Private Declare Function APIBeep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long 'L'api
Sub Emettre(Frequence As String)
If txttps = "" Then 'Si le txttps est vide
MsgBox "Vous devez inscrire la durée du son", vbCritical, "Attention!"
txttps = "" 'Vide txttps
Exit Sub
ElseIf Val(txttps) > 20 Then
MsgBox "La durée du son, en secondes, ne doit pas dépasser 20 secondes", vbCritical, "Attention!"
txttps = "" 'Vide txttps
Exit Sub
Else 'Si txttps n'est ni vide, ni suppérieur à 20
APIBeep Frequence, txttps * 1000
'Joue le son d'une fréquence donnée, avec la durée voulue
'La durée est définie par txttps (*1000 car le PC comprend la durée en millisecondes
lblfreq = Frequence 'Indique la fréquence dans lblFreq
End If
End Sub

et apres tu a juste a appellé ta fonction avec la frequence en parametre ex:
emettre(110)
voila bon devellopement
txttps contient la durée du son
si par contre tu troyuve comment on fait varier la frequence d'un son mais avec direct sound pa avec le buzzer, previent moi

Pour information :
Declare Function Beep Lib "kernel32" Alias "Beep" ( _
ByVal dwFreq As Long, _
ByVal dwDuration As Long) As Long

Versions :
. Windows 95/98 : Oui
. Windows NT : A partir de 3.1
. Windows 2000/XP : Oui

Description :
Cette fonction produit un son simple à travers le haut-parleur.
dwFreq est la fréquence en Hertz du son à générer.
dwDuration est la durée du son.
Attention, la fonction est synchrone, elle ne rend pas la main tant que le son n'est pas fini.
De plus, sous Windows 95 les arguments ne sont pas pris en compte, le son standard est produit.


--= Capoueidiablo =--