Explanation
BEEP Statement
Generates a beep sound from your computer's speaker.Worth knowing
Useful and cross-version information about the programming environments of QBasic, QuickBasic and Visual Basic for DOS.
Useful and cross-version information about the programming environments of QBasic, QuickBasic and Visual Basic for DOS.
BEEP |
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