Better way...

by Pete (Login The-Universe)
Admin

 

PRINT "Would you like to go back to menu Y/N?"
DO
mykey$ = UCASE$(INKEY$)
LOOP UNTIL mykey$ = "Y" OR mykey$ = "N"
SELECT CASE mykey$
CASE "N"
PRINT "Would you like to go to the main menu Y/N?"
DO
mykey$ = UCASE$(INKEY$)
LOOP UNTIL mykey$ = "Y" OR mykey$ = "N"
SELECT CASE mykey$
CASE "N"
END
CASE "Y"
GOTO BEGINA
END SELECT
CASE "Y"
GOTO BEGINB
END SELECT

------------------------------------

Pete

Posted on Nov 26, 2010, 9:18 PM

Respond to this message   

Return to Index

 Copyright © 1999-2014 Network54. All rights reserved.   Terms of Use   Privacy Statement