QBasic 1.1: 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