Beep
Aus API-Wiki
Version vom 5. November 2016, 23:09 Uhr von Jochen Wierum (Diskussion | Beiträge)
Mit Hilfe der Funktion Beep können Töne mit vorgegebener Frequenz und Dauer über den Systemlautsprecher ausgegeben werden.
">
Declare Function Beep Lib "kernel32.dll" ( _
ByVal dwFreq As Long, _
ByVal dwDuration As Long) As Long
Parameter
dwFreq
- Die Frequenz des Tons in Hertz. Diese muss zwischen 37 und 32767 liegen. Es sind nur Frequenzen bis 16 kHz sinnvoll, da höhere Frequenzen nicht mehr wahrnehmbar sind.
dwDuration
- Die Dauer des Tons in Millisekunden.
Rückgabe(n)
Die Funktion gibt einen Wert des Types Long ungleich 0 bei Erfolg, den Wert 0 bei Misserfolg zurück.
Sollte die Funktionsrückgabe 0 sein, so lässt sich durch Err.LastDLLError die Fehlernummer zurückgeben.
Beispiel
">
Dim RetVal As Long
'Ein 1 Sek. langes 'a'
RetVal = Beep(440&, 1000&)
If RetVal = 0 Then
'Error-Handler
End If
Hinweise
Das Programm wird für die Dauer des Tons angehalten.
Betriebssystem
- Windows 95 / 98 / Me (Hier werden die beiden Parameter allerdings ignoriert.)
- Windows NT 4.0 / 2000 / XP
- Windows Vista
Verweise
- MSDN US-Library [1]
- Beispiel bei <syntaxhighlight lang="vb">Archiv <syntaxhighlight lang="vb">archiv.net/archiv/tipp_430.html