Discussion :

[aaimadeddine]

salut,
mon probleme c qu'on a un projet à rendre:la realisation d'un portable en vb
Le principe est simple c apres realisation d'interface on doit affecter a chaque touche du portable un bip sonore
et je veux aussi que le bip de la touche 1 soit different du celle de 2 et ainsi de suite...
et aussi, apres avoir composer le numero de ce portable
(numero proposé exemple 012345)il doit lancer sa sonnerie une vraie musique...
comment dois-je faire?
et merci d'avance pour l'aide.

[La Praline]

comment dois-je faire?

Huhu !!! Encore un membre pressé ^^

et merci d'avance pour l'aide.

Te rends-tu compte de la charge de travail que tu viens de donner ?
C'est un projet, comme tu l'as dis, et donc il doit se traiter petit à petit.

Commence par le commencement...
Quel est ton niveau en VB ?
Quelle version de VB utilises-tu ? VB5, VB6...

Et une question à la fois sinon il n'y a que peu de chance qu'on te réponde.

Et surtout... personne ne fera le projet à ta place. Donner un coup de main c'est avec grand plaisir.
Mais il va falloir que toi tu fasses des efforts, en nous montrant du code, des screen shot etc...


En attendant des précisions de ta part...
Cordialement

[zazaraignée]

Je n'était pas en forme hier soir (pour vous, la nuit dernière...) quand j'ai lu ce message et j'ai préféré ne pas répondre car la réponse aurait été tout, sauf polie. Ce qui n'est pas digne d'une modératrice. Je vois que La Praline a bien traduit ma pensée, et ce, poliment!

Je dirai juste là-dessus qu'on n'est pas là pour faire le travail à ta place et que si tu as une difficulté précise, qu'après avoir chercé et pas trouvé, tu es toujours dans l'interrogation, ça nous fera plaisir de t'aider.

[La Praline]

J'ai eu une réponse par mp.
Je rappel que les sujets ne doivent pas être traités par mp, mais dans la situation actuelle, c'est déjà mieux que rien...

salut,
je vous demande pardon car mon message n'était pas précis, et je suis d'accord avec votre point de vue,
alors commencant petit a petit,
je veux seulement savoir comment peut on introduire un bip dans un programme vb càd quant on appuie sur le bouton de commande on doit entendre un bip.Veuillez me donner seulement le code permettant d'entendre un bip sonore, car j'ai deja trouve un mais j'avais rien compris,
'je suis en 1ere annee informatique donc debuton, et il
's'agit de vb6
a+
cordialement

A vos bons soins...

[ProgElecT]

sur un Form, un TextBox

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
Option Explicit
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Declare Function waveOutGetNumDevs Lib "winmm.dll" () As Long
Const SND_ASYNC = &H1
Const SND_NODEFAULT = &H2
Dim NumCart&
 
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Dim Frequence As Long
Private Sub Form_Activate()
For Frequence = 0 To 5000 Step 100
 'son de Frequence en hertz pour une durée de 25 millisecondes
 Beep Frequence, 25
 Me.Caption = Frequence
 DoEvents
Next Frequence
NumCart& = waveOutGetNumDevs
If NumCart& > 0 Then
 'une carte son existe bien
 Else
 MsgBox "Aucune carte son n'a été detectée"
End If
End Sub
 
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
'un son d'une Frequence en hertz differente pour chaque touche
'du clavier, durée de 50 millisecondes
Frequence = KeyCode * 25
Beep Frequence, 50
If KeyCode = 13 Then 'pour simuler l'appel (sonnerie)
 If NumCart& > 0 Then 'une carte son existe bien
  sndPlaySound "C:\Cd OFFICE2000\PFILES\MSOFFICE\OFFICE\REMINDER.WAV", SND_ASYNC Or SND_NODEFAULT
  Else
  For Frequence = 2500 To 4000 Step 50
   Beep Frequence, 50
   Beep Frequence / 2, 50
   DoEvents
  Next Frequence
  For Frequence = 3000 To 2500 Step -25
   Beep Frequence, 50
   Beep Frequence * 2, 50
   DoEvents
  Next Frequence
 End If
End If
End Sub

Cela devrait faire ton bonheur

[La Praline]

Tout ça pour un simple "bip" !!!
Y'a des fois je me demande comment estce qu'on fait des choses compliquées...