Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: QB: Näppäimistöpuskurin tyhjennys (QBasic)

Tapsa [17.11.2006 15:04:32]

#

Tässä pieni esim. ohjelmani koodista

DO: v$ = INKEY$
  IF LEFT$(v$, 1) = CHR$(0) THEN
    IF RIGHT$(v$, 1) = ";" THEN   'F1
      'koodia
    IF RIGHT$(v$, 1) = ... THEN
      'koodia
    'jne.
    END IF
  END IF
LOOP

Ongelma on, kun painaa jotain näppäintä useamman kerran, niin näppäimistöpuskuri täyttyy. Ohjelma on luonteeltaan sellainen, että yhtä näppäintä ei saa painaa kuin kerran.
Siitä seuraa, että kun sitten painaa muuta näppäintä toiminto on sama kuin edellisellä näppäimellä.

Kysymys: Kuinka saa puskurin tyhjennettyä? v$="" ei auta.

E.K.Virtanen [17.11.2006 15:09:03]

#

Laita johonkin sopivaan kohtaan

DO
temp$ = INKEY$
LOOP Until temp$ = ""

Niin ohjelma odottaa että nappia ei paineta.

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta