currupipi999 respondió:
Yo lo he hecho utilizando API's. Aquí el código: Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Command1_Click() Dim frecuencia As Long Dim duración As Long frecuencia = 800 'Hz...