QBasic 1.1 Commands List: BEEP Statement

Example(s)


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