Utilisation du Clavier

E> Do
    While K$=""
     K$=Inkey$
    Wend
    If Asc(K$)=0 Then Print "Aucun code Ascii"
    Print "Le Scan Code est ";Scancode
    K$=""
   Loop

SCANSHIFT
fonction : retourne l etat des touches Shift avec INKEY$
s=Scanshift

Pour detecter si une touche est enfoncee en meme temps qu une touche [Shift], la fonction Scanshift retourne les valeurs suivantes :

Valeur   Signification
0        aucune touche [Shift] enfoncee
1        touche [Shift Gauche] enfoncee
2        touche [Shift Droite] enfoncee
3        les deux touches [Shift] enfoncees

Essayez l exemple suivant avec diverses touches et combinaisons de touches [Shift] :

E> Do
    A$=Inkey$
    S=Scanshift
    If S<>0
     Print S
    End If
   Loop

KEY STATE
fonction : verifier si une touche specifique est enfoncee
k=Key State(scan code)

Utilisez cette fonction pour verifier si une touche specifique est actuellement enfoncee. Le code de scan correspondant doit etre indique entre parentheses. Si la touche est enfoncee, KEY STATE retourne TRUE (-1), sinon FALSE (0). Par exemple :

E> Do
    If Key State(69)=True Then Print "ECHAP !" : Rem Touche Esc enfoncee
    If Key State(95)=True Then Print "A L AIDE !" : Rem Touche Help enfoncee
   Loop