mit bestem Dank,
Jule
mit bestem Dank,
Jule
Ich bin mir sicher, so eine Frage schon mal in der Recherche gesehen zu haben.
Versuchs doch dort einmal
Peter
lang nichts mehr gehört von Dir - mit der API geht das. Welches Betriebssystem hast Du?
Gruß
Micha
aus dem API-Guide:
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Private Sub Form_Activate()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
Dim Cnt As Long
For Cnt = 0 To 5000 Step 10
'play a tone of 'Cnt' hertz, for 50 milliseconds
Beep Cnt, 50
Me.Caption = Cnt
DoEvents
Next Cnt
End Sub
Liebe Grüße
Micha
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen