Traitement de caractere dans une chaineRésolu

Question

Bonjour a tous,

j'ai un testbox qui contient 6 caractere, je voudrais faire en sorte que chaque caractaire soit dans une variable (var[] ). Comment faire, j'ai regarder sur le site mias je ne vous rien ou plustot je regarde p-t pas les bonnes choses.

Merci
DraaFil

sobullshit · Accepted Answer

Cherche du côté de la fonction Mid.
Ca permet de récupérer un caractère dans un chaîne.

Aller je sais que tu es fainéant, donc voilà le mdoe d'emploi:

Mid(tachainedecaractère, tapositiondépart, lenombredecaractère)

exemple :

mid("salut", 2, 1) = "a"
mid("salut", 3, 3) = "lut"

jrivet · Answer

Salut,
Je ne sais pas si cela peu t'aider mais regarde:
Dim MString As String = "Coucou"
Dim Resultat() As Char = MString.ToCharArray
, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

cs_casy · Answer

Mid c'est du VB6. De plus ça donne pas un tableau.

Il vaut mieux utiliser ToCharArray ou ToByteArray

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

DraaFil · Answer

je roule sur vb6 merci a vous

anto37_44 · Answer

Salut DraaFil


essai un truc comme çà
var[0]=Mid(Text1.Text, 1, 1)
var[1]=Mid(Text1.Text, 2, 1)
var[2]=Mid(Text1.Text, 3, 1)
var[3]=Mid(Text1.Text, 4, 1)
var[4]=Mid(Text1.Text, 5, 1)
var[5]=Mid(Text1.Text, 6, 1)

Si tes 6 caracteres sont deja dans le textbox quand tu lances le programme, tu peux taper çà directement dans Form_Load(), ou sinon ( si tu changes tes caracteres pendant que le programme tourne), il est preferable de le rentrer dans une Command_Click()


Voilà, j'espere que c'est çà que tu veux, sinon desole 

anto37_44

anto37_44 · Answer

oups, desole j'arrives un peu tard
quand j'ai commencer à taper y avais pas de message

anto37_44

jmfmarques · Answer

J'aurais bien voulu te répondre qu'il faut utiliser une boucle For next et t'y aider...
Mais je n'aime pas que l'on ouvre sous VB.Net pour dire ensuite qu'on est sous VB6 
Alors : ne te trompe pas la prochaine fois...

DraaFil · Answer

merci autres question si le texte de ma textbox est indefini, comment retourne le nombre de caratere (est-ce len si oui comment l'utiliser) 

Merci

jrivet · Answer

Tout a fait d'accord aves ...lassant les gens qui se trompe de section...*

@+: Ju£i?n
Pensez: Réponse acceptée

drikce06 · Answer

sobullshit avait une meilleure boule de crystal que vous 

 Drikce 06 (Nouveau !!! Forum Exclusivement Office Et VBA By Mortalino)

Si la réponse vous convient: Réponse acceptée < body>

anto37_44 · Answer

Si le text est indefini, 
tu tapes
Mid(text1.text,'le point de depart')
çà te donneras tout les caracteres apres ton caractere de depart
anto37_44

drikce06 · Answer

Dim i as Long ou Integer
i = Len(TextBox1.Text)

 Drikce 06 (Nouveau !!! Forum Exclusivement Office Et VBA By Mortalino)

Si la réponse vous convient: Réponse acceptée < body>

anto37_44 · Answer

desole j'avais mal compris la question

anto37_44

sobullshit · Answer

Ma boule de crystal ma just empecher d'appuyer sur "annuler" quand jme suis rendu compte que j'avais mal répondu...
Donc elle est pas terrible

Gobillot · Answer

Salut,
si on est bien en VB6:
  pas besoin de savoir de savoir la Longueur, ni de faire de boucle, ni même de dimentionner le tableau résultant
  réponse dans un tableau de bytes:

    Dim var() As Byte
    var = StrConv(Text1.Text, vbFromUnicode)

Daniel

Traitement de caractere dans une chaine

15 réponses

Votre réponse

Discussions similaires