comment mettre chaque lettre d'un mot dans un tableau

Question

8-) 
J'aimerais savoir comment mettre chaque lettre d'une chaine dans un tableau.
Merci d'avance.

BasicInstinct · Answer

'lut

for I=0 to len(MaChaine)-1
Montableau(I)=mid(Machaine,I,1)
next

 :clown)  BasicInstinct  :clown)

Boboss99 · Answer

chaine = "bonjour"

for i = 1 to len(chaine) then
  tableau(i-1) = mid(chaine,i,1)
next i

Boboss

cs_jer79 · Answer

8-)

cs_saadox · Answer

Bonjour, voila aprés test ca devrai marcher chez toi voila l'exemple :

Public Class Form1
    Dim d, tab(), dd As String
    Dim p As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        d = TextBox1.Text
        p = Len(d)
        ReDim tab(p)
        For I = 1 To p
            tab(I) = Mid(d, I, 1)
        Next
        For I = 1 To p
            dd = dd + tab(I)
        Next
        TextBox2.Text = dd
    End Sub
End Class


ce code te permetra de recuperer une chaine 'd' de la mettre dans un tableur 'tab()' avec le quel tu peux la reafficher dans un textbox2 'dd'

ps: j'ai mis trop de variables certe mais c'est juste pour faciliter ta tache a toi d'optimiser 

bon courage
Developper c'est créer une nouvelle vie, Celle qu'on trouve parfaite...Saad.

jmf0 · Answer

Hé bé !...
Et StrConv, alors ?
VB l'aurait mis à disposition du seul roi de Prusse ? 

Exemple avec VbUnicode ===>>> dans tableau titi

  toto = "blabla blabla"
 titi = Split(StrConv(toto, vbUnicode), Chr(0))
 For i = 0 To UBound(titi)
   MsgBox titi(i)
 Next

PCPT · Answer

çà vaut le coup de relever un topic de 6 ans vous croyez?!!!!

surtout pour ce genre de question bateau

pensez à regarder les dates svp, merci

jmf0 · Answer

Tiens !
Je me suis fait avoir (je n'avais même pas remarqué !  )

cs_saadox · Answer

si si j'avais vu la date, mais comme ça si quelqu'un d'autre cherche a trouver des renseignements sur le meme sujet il trouvera aumoin une reponse 

Developper c'est créer une nouvelle vie, Celle qu'on trouve parfaite...Saad.

cs_Ayr · Answer

C'est gentil Saadox mais comme il semblerait que les quelqu'un ne lisent jamais anciens messages...

Comment mettre chaque lettre d'un mot dans un tableau

9 réponses

Discussions similaires