Beep

Aus API-Wiki
Zur Navigation springenZur Suche springen
Die druckbare Version wird nicht mehr unterstützt und kann Darstellungsfehler aufweisen. Bitte aktualisiere deine Browser-Lesezeichen und verwende stattdessen die Standard-Druckfunktion des Browsers.

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 auf vbArchiv [2]