Discussion :

[WBO]

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

[tomlev]

Utilise Console.Beep :

Code :

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

1
2
3
4
 
Dim frequency As Integer = 440 ' 440 Hz (La)
Dim duration As Integer = 1000 ' 1000 ms
Console.Beep(frequency, duration)

[WBO]

merci, mais j'obtiens le message suivant

'Beep' nest pas un membre de 'System.Console'

je développe sur un tracker (ce sont des projets CAB Smart Device), je ne sais pas si cela à une influence.

EDIT
les projets Cab Smart Device n'ont pas cette notion de "Console.Beep".

[tomlev]

je développe sur un tracker (ce sont des projets CAB Smart Device), je ne sais pas si cela à une influence.

Ah bah oui, la méthode n'existe pas dans le Compact Framework... En même temps c'est logique, vu qu'en général ce genre d'appareil n'a pas de haut-parleur interne

Dans ce cas je sais pas trop comment on peut faire, vu qu'a priori DirectSound ne doit pas être supporté non plus

[WBO]

le "beep()" marche, par contre, c'est toujours sur la même fréquence. j'ai joué sur la longueur (dans une boucle) mais le résultat n'est pas satisfaisant.

quelqu'un aurait il une piste ?