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 :

[VB6] Récupérer chaque lettre d'un String


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Avril 2004
    Messages
    32
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 32
    Par défaut [VB6] Récupérer chaque lettre d'un String
    Bonjour,

    Je suis en train de faire une petite application en Visual Basic 6.0.
    J'ai un problème avec le type String.
    Je voudrais déclarer un String, et pouvoir récupérer chacune des lettres dans des variables différentes.

    De plus, je rencontre un problème lorsque je souhaite initialiser un tableau de String :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim mot3lettres() As String
    mot3lettres(1) = "LIT"
    Le debugger me met une erreur à la seconde ligne, et je ne comprend pas pourquoi ...

    Merci

  2. #2
    Membre éprouvé
    Profil pro
    Inscrit en
    Avril 2005
    Messages
    137
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2005
    Messages : 137
    Par défaut
    Essaye :
    ca récupère la première lettre de la variable "mot".

  3. #3
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim mot3lettres() As String 
    mot3lettres(0) = "LIT"
    ou

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim mot3lettres(1) As String 
    mot3lettres(1) = "LIT"
    Si tu ne dimensionnes pas ton tableau de la valeur maxi de ton index, ça marche pas...

    A+

  4. #4
    Membre Expert
    Avatar de méphistopheles
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    1 551
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 1 551
    Par défaut
    pour la première question, le code suivant devrais aller:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    public function découpstring(montext as string)as string
    dim i as integer
    découpstring=left(montext,1)
    for i=2 to len (montext)
      découpstring=découpstring & "," & mid(montext,i,1)
    next i
    end function
    le résultat est sous la forme r,e,s,u,l,t,a,t

    si tu veux avoir un tableau, apelle comme ça:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    montableau()=split(découpstring("resultat"),",")
    pour ta seuxième question:c'est par-ce que tont tableau n'est pas dimentionné.
    il faut que tu lui donne une taille avec la fonction redim.

    exemple:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim mot3lettres() As String 
    redim preserve mot3lettres(1)
    mot3lettres(1) = "LIT"

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Avril 2004
    Messages
    32
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 32
    Par défaut
    Merci à tous

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Récupérer 4 dernieres lettres d'une string
    Par Joccy dans le forum Langage
    Réponses: 1
    Dernier message: 26/11/2007, 15h23
  2. [JSTL] Récupérer une variable du style <%String bob = "bobby"%>
    Par nickoshiba dans le forum Taglibs
    Réponses: 2
    Dernier message: 15/03/2005, 08h50
  3. [VB6] Récupérer l'heure d'un serveur
    Par moaleboss dans le forum VB 6 et antérieur
    Réponses: 14
    Dernier message: 02/06/2004, 13h25
  4. [VB6] creation de variable de type string dynamiquement
    Par da40 dans le forum VB 6 et antérieur
    Réponses: 10
    Dernier message: 12/06/2003, 16h59

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