Bonjour,

après avoir regardé comment faire un beep, la méthode la plus simple me parait être le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
sound(y,Fe);
bref très bien, mais cela ,ne marche pas

sinon, j'ai aussi trouvé le code suivant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Declare Function BeepPerso Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
 
 
Sub EmetBeep()
Const Hz = 300 'Fréquence
Const Tp = 1000 'Temps
    Call BeepPerso(Hz, Tp)
End Sub
mais je n'arrive pas à ajouter la librairie kernel32 à mon projet.

quelqu'un pourrait me donner un coup de main ?

Wbo