| .BEEP Statement Programming Example. |
|
 QuickSCREEN Details Example Contents Index |
| ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ |
| BEEP Statement Programming Example |
|
| The following example uses BEEP to indicate an error in the response: |
| |
| 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 |
| |
