IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Basic Discussion :

Bug avec fonction INPUT n$


Sujet :

Basic

  1. #1
    Candidat au Club
    Homme Profil pro
    retraité
    Inscrit en
    Juillet 2015
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : retraité

    Informations forums :
    Inscription : Juillet 2015
    Messages : 2
    Points : 3
    Points
    3
    Par défaut Bug avec fonction INPUT n$
    Bonjour,

    Je crée un petit programme, le jeu du PENDU.

    Je demande les lettres à découvrir avec la fonction input n$, mais......
    quand je tape un e la lettre n' est pas prise en compte. cela marche avec les autres lettres !!??

    Quelqu'un a -t-il constaté ce phénomène ?

  2. #2
    Membre à l'essai
    Homme Profil pro
    pc
    Inscrit en
    Novembre 2015
    Messages
    15
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : pc

    Informations forums :
    Inscription : Novembre 2015
    Messages : 15
    Points : 18
    Points
    18
    Par défaut bug avec fonction input n$ en basic
    bojour

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    'Un Petit Test Pour Input
    cls
    PRINT "Test INPUT N$ : Pour une lettre"
    INPUT "Une Lettre "; n$
    PRINT 
    PRINT "Lettre = "; n$
    ---------------------------------------
    'le mot est en MAJUSCULES : mot = "BONJOUR"
    'si le mot est en MINUSCULES : mot = "bonjour"
    'si le mot est MAJUSCULES ET MINUSCULES : mot = "Bonjour"
    CLS
    a$ = "BONJOUR": a1 = LEN(a$): '(nobre de lettre dans le mot)
    c$ = STRING$(a1, "-")
    PRINT a$
    10 REM
    IF c$ = a$ THEN :  PRINT  :  PRINT "fin le mot est "; c$: END
    PRINT "mot en"; a1; "lettre "; c$
    INPUT "Une Lettre "; n$
    ' test la lettre
    FOR b1 = 1 TO a1
    IF n$ = MID$(a$, b1, 1) THEN GOSUB 100
    NEXT b1
    b1 = 0
    if k=0 then k=0 : PRINT :GOSUB 200
    IF k = 1 THEN k = 0 :  PRINT : GOTO 10
    END
    100 REM
    MID$(c$, b1, 1) = n$: k = 1
    RETURN
    end
    200rem
    PRINT"ERRUER DE LETTRE"
    l$=l$+n$
    PRINT l$
    RETURN

Discussions similaires

  1. "Bug" avec fonction Excel DECALER
    Par FlorianSerouart dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 23/02/2010, 13h08
  2. Problème avec scipad et la fonction "input"
    Par gevaudan17 dans le forum Scilab
    Réponses: 3
    Dernier message: 09/03/2009, 17h13
  3. [RegEx] Bug avec fonction de remplacement ereg_replace
    Par Invité dans le forum Langage
    Réponses: 2
    Dernier message: 22/12/2007, 15h23
  4. [Dates] Bug avec ma fonction formatage de date
    Par groland dans le forum Langage
    Réponses: 6
    Dernier message: 14/03/2007, 15h24

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo