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

VB 6 et antérieur Discussion :

correspondance dans un tableau


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Inscrit en
    Juin 2006
    Messages
    584
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 584
    Par défaut correspondance dans un tableau
    Bonjour, j'aurai une petite question.

    j'ai un tableau qui contient les caracteres de l'alphabet de 0 a 25 pour a à z.

    Je voudrai a partir d'un caractere obtenir le nombre lui correspondant dans le tableaux.
    Par exemple a partir du caractere z obtenir 23 et du caractere b obtenir 1.

    Mais je ne sais pas comment faire, ce que je sais faire c'est l'inverse moi

    Pourriez vous m'aider?
    Merci

  2. #2
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    z obtenir 23 et du caractere b obtenir 1
    z obtenir 25
    a, code ascii = 97
    z, code ascii = 122
    F2, Strings
    Asc("a") = 97 , Chr(97) = "a"
    Asc("z") = 122, Chr(122) = "z"
    Donc avec les fonctions Asc(String As String) et Chr(CharCode As Long), tu dois pouvoir faire tout se que tu souhaites.
    Etant en base 0 (tableau 0 to 25)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Num_Dans_Tableau = Asc("a") -97 '97 - 97 = 0
    Num_Dans_Tableau = Asc("n") -97 '110 - 97 = 13
    Num_Dans_Tableau = Asc("z") -97 '122 - 97 = 25
    Nom verifié, mais sa doit être sa.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

  3. #3
    Membre éclairé
    Inscrit en
    Juin 2006
    Messages
    584
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 584
    Par défaut
    Merci pour ta réponse,
    je vais regardé ca.
    Mais j'ai oublié de dire que le tableau n'était pas complet lol.
    il va contenir aussi a la suite les majuscule et les numero de 0 a 9.

  4. #4
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    Alors je te conseils de remplir ton tableau comme suit
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Private Sub Form_Load()
    Dim T As Integer
    '"0" (zero) = code ascii 48
    '"z" = code ascii 122
    Dim MeTabl(122 - 48)
    For T = 0 To 122 - 48
     MeTabl(T) = Chr(T + 48)
    Next T
    End Sub
    et tu appliques la formule, Num_Dans_Tableau = Asc("LeCaractére") -48
    Il est vrai que tu aurras dans ton tableau les signes des codes ascii 58 à 54 et aussi 91 à 96, mais je pense que cela ne doit pas te gener.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

  5. #5
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Par défaut
    Bonsoir, Morgan47,

    Juste deux toutes petites choses :


    La premère :

    La consultation d'une table ascii (tu en trouves partout, y compris dans ton aide en ligne... Il n'y a par ailleurs pas un seul manuel informatique, même le plus élémentaire et quel que soit le sujet ou le langage dont il traite, qui n'affiche pas cette table !...)

    La seconde :
    Tu n'as alors absolument rien compris au code que je t'ai donné là hier : !!!
    http://www.developpez.net/forums/sho...d.php?t=422909

    Car ce code a précisément été écrit en calculant des différences entre indice de tableau et valeur ascii ...

  6. #6
    Membre éclairé
    Inscrit en
    Juin 2006
    Messages
    584
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 584
    Par défaut
    si j'ai compris ton code mais j'ai commencer a faire l'algorithme de chiffrement a l'aide d'une clé et j'ai besoin de convertir les caractere de ma clé en un nombre, donc je fait une boucle pour chaque caractere de la clé et je le transforme en un chiffre qui lui correspond dans le tableaux.

  7. #7
    Rédacteur
    Avatar de DarkVader
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    2 131
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 131
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    const myString ="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqustuvwxyz0123456789"
     
    function codageCar(myCar as string) as byte
        codageCar=instr(1,myString,myCar)
    end function
    et rien ne t'empêche de mélanger la suite

  8. #8
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    Si tu construit ta clef avec une suite de RND, quand le RND correspond au code ascii 58 à 54 et 91 à 96, tu passes et tu refais un tirage, sa devrait faire, comme sa quand tu veux verifier la clef, la formule pour retouver dans le tableau correspondrat bien aux chiffres, lettres majuscules et minuscules.
    A+
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

Discussions similaires

  1. alterner les couleurs dans un tableau avec xsl
    Par Eithelgul dans le forum XSL/XSLT/XPATH
    Réponses: 14
    Dernier message: 03/05/2015, 23h29
  2. Réponses: 2
    Dernier message: 23/11/2003, 18h44
  3. Réponses: 4
    Dernier message: 10/10/2003, 18h04
  4. verification de doublons dans un tableau
    Par bohemianvirtual dans le forum C
    Réponses: 11
    Dernier message: 25/05/2002, 12h21

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