comment peut on programmer un bouton pour emmetre un beep ( un bouton qui se sonne)sous VB6
beep
je ss pas comment le programmer
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Command1_Click() jve_1_bp End Sub Private Sub jve_1_bp() donne_un_bp_plz End Sub Private Sub donne_un_bp_plz() dac 1200 End Sub Private Sub dac(nb As Integer) For i = 1 To nb Beep Next End Sub
Private Sub Command1_Click() jve_1_bp End Sub Private Sub jve_1_bp() donne_un_bp_plz End Sub Private Sub donne_un_bp_plz() oniva 1200 End Sub Private Sub oniva(nb As Integer) dac 1200 End Sub Private Sub dac(nb As Integer) Dim ri1 As Boolean, deb As Long Do While Not ri1 For i = 1 To nb Beep deb = Timer Next Do While Timer <= deb + 3 DoEvents Loop Loop End Sub