home *** CD-ROM | disk | FTP | other *** search
/ Windows CE - The Ultimate Companion / ROMMAN_CE.iso / Files / Programming / Basice / 1KEY.BAS next >
BASIC Source File  |  1997-03-14  |  67b  |  6 lines
  1.  LOOP 
  2.     A$= KEY$
  3.     WHILE LEN%( A$) = 0
  4.     ENDLOOP 
  5.  PRINT A$
  6.