Discussion :

[biboulou]

bonjours
j'ai une chaine de caracteres que je voudrais couper en plusieurs paquets identiques
elle se situe dans une textbox
exemple 12345AB7890 et je voudrais 12 34 AB 78 90
les longueurs de caractere dans le texbox ne sont jamais identique
je debute et je pense que avec la fonction mid ca serait jouable mais j'ai pas trouve d'exemples qui me convienne dans les tutos
et il possible de compter les paquets avec la fonction len aussi ????? pour l'exemple 5
merci

[DAUDET78]

C'est toujours un paquet de 2 caractères ?
Si il y a 3 caractères dans un paquet, il y a toujours un multiple exact de caractère dans ton texte d'origine?

PS: en fait, tu veux mettre une entrée hexadécimal de "x" caractères dans une variable entière?

[biboulou]

salut
oui il y a toujours un nombre paire de caracteres les paquets de 2 sont toujours complet
le reste j'ai pas compris
a+

[DAUDET78]

Un truc de ce genre (non testé) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
ValInit$="123456789A" 'chaine à traiter
ValOut$="" ' résultat
For I% = 1 to len(ValInit$) step 2
   ValOut$=ValOut$ & " " & Mid$(ValInit$,I%,2)
Next I%

ValOut$ devrait contenir "12 34 56 78 9A "

[biboulou]

merci je test
a++

[ucfoutu]

Bonjour,

Pour ce cas précis : sans intérêt réel (juste pour améliorer ses connaissances). Peut par contre être vraiment utile dans d'autres cas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 mot = "123456789A"
  Do While Len(flt) < (Len(mot) \ 2) * 3
    flt = flt & "@@ "
  Loop
  MsgBox Format(mot, flt)

Il est clair que le mot traité doit être composé d'un nombre entier de "groupes"