La funcion
Beep() del
API de Windows, no la de
Visual Basic, si permite indicar frecuencia y duracion como el
Sound() de
QBasic:
Código:
Option Explicit
Private Declare Function CPUBeep Lib "kernel32.dll" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Private Sub Form_Load()
Call CPUBeep(5000, 1000)
End Sub
Salu2...