[VB6]: Dividere testo carattere per carattere

[emik]

Come faccio a dividere un testo carattere per carattere . Con split nn funziona. Lavoro in window xp ciao ciao emik

[hkproj]

un for next ti può aiutare
es:
for i = 1 to stringa.length
matrice(i ) = stringa.left(i)
next

scusa, non ricordo se il metodo left è proprio così, ma il concetto è quello

[Luciano79]

Originariamente inviato da hkproj
un for next ti può aiutare
es:
for i = 1 to stringa.length
matrice(i ) = stringa.left(i)
next

scusa, non ricordo se il metodo left è proprio così, ma il concetto è quello

E' VB6

redim preserve matrice(len(stringa)-1)
for i=1 to len(stringa)
  matrice(i-1)=left(Stringa,1)
next i

[icecube_HT]

Originariamente inviato da emik
Come faccio a dividere un testo carattere per carattere . Con split nn funziona. Lavoro in window xp ciao ciao emik

Puoi semplicemente accedere all' N-esimo carattere con: car = Mid$(s, N, 1)

Tra l'altro funziona anche in assegnazione, con la sintassi: Mid$(s, N, 1) = car

Per esaminare tutta la stringa fai un ciclo:
For i = 1 To Len(s)
car = Mid$(s, i, 1)
'...elabora il singolo carattere...
Next

Ciao !!!



...ne abbiamo gia' parlato un...milione di volte ?