Qbasicnews.com

Qbasicnews.com > QBasic > QB Discussion & Programming Help > on key function
Full Version: on key function
You're currently viewing a stripped down version of our content. View the full version with proper formatting.

andy

10-02-2003, 05:41 PM
When I use the code:

Key 15, chr$(0) + chr$(28)
on key(15) gosub ent
key(15) on

I want to use this code to make it so that when I press enter it goes to the gosub ent. Some times it works, but usually it doesn't, even when I haven't changed the code in any way. IOt worked last week, I saved and quit. I went on again the next day and it didn't work.
Can any one help either ammend this code or create a new one.
I will be gratefull for any advise.

seph

10-02-2003, 07:44 PM
I *never* use ON KEY, its just not a good function. Try this:

Code:
DO
     REM ' --- your main code here

     key$ = INKEY$
     SELECT CASE key$
     CASE CHR$(13) ' (enter key)
          'do this
     END SELECT
LOOP

andy

10-03-2003, 12:44 PM
Thank you I wll try that code tonight. The problem was I couldn't find the Ascill code for enter.

relsoft

10-03-2003, 01:12 PM
Chr$(13)

Neo

10-03-2003, 01:12 PM
CHR$(13) = Carriage Return
CHR$(10) = Line Feed

Mango

10-03-2003, 06:11 PM
Quote:Thank you I wll try that code tonight. The problem was I couldn't find the Ascill code for enter.

http://www.jimprice.com/ascii-0-127.gif

Ain't Google a wonderful thing???

andy

10-03-2003, 11:54 PM
:lol: Great, it works, thanks alot. :lol:

seph

10-04-2003, 01:42 AM
No problem andy. But remember... you owe me...... for life!!!!!!! MWAHAHAHAHA!

RST

10-04-2003, 02:41 AM
Quote:No problem andy. But remember... you owe me...... for life!!!!!!! MWAHAHAHAHA!

Don't worry. Seph's kind of cool once you get used to him, Andy. Just takes a while. Tongue

andy

10-06-2003, 04:53 PM
Thanks
Qbasicnews.com > QBasic > QB Discussion & Programming Help > on key function