Agrega el Set bell ON en el Init del Formulario
y luego agrega el resto de código en el evento del Olecontrol,también vas a necesitar insertar un Timer1 para controlar los segundos ,en su evento Interval
Esto de abajo lo modificas queda casi listo lo que necesitas desarrollar
wfechain=STR(YEAR(DATE()),4)+PADL(ALLTRIM(STR(MONTH(DATE()),2)),2,'0')+PADL(ALLTRIM(STR(DAY(DATE()),2)),2,'0')
SELECT auxrec
SCAN FOR SUBSTR(auxrec.date,1,8)= wfechain
IF ch < 0.0
INSERT INTO tmpGrid (Estación, Fecha, Parámetro, CH) VALUES ("ARA", auxrec.date,auxrec.name,auxrec.ch)
SET BELL TO 'C:\Archivos de programa\Windows NT\Pinball\SOUND4.wav'
?? CHR(7)
parametro = auxrec.name
fech = auxrec.date
mensaje = 'ARA' + parametro + fech
condicion = 0 + 48
titulo = 'ALARMA'
MESSAGEBOX(mensaje, condicion,titulo)
ENDIF
ENDSCAN
