QBasic 1.1 Commands List: BEEP Statement

Syntax
BEEP

Example

CLS ' Clear the screen DO INPUT "Hear a beep (Y or N)"; Response$ R$ = UCASE$ (MID$ (Response$,1,1)) IF R$ <> "Y" OR R$ = "N" THEN EXIT DO BEEP LOOP