[VB6] Separare cifre di un numero

[satriano]

Salve.
Dopo una certa elaborazione, supponendo che io abbia come risultato
234 come faccio a separare e mostrare separatamente le cifre di questo risultato in diversi txtbox ? cioé con l'esempio di prima in un txtbox 2 un altro 3 e ancora uno 4 ?

[GudFella]

carichi tutti i valori in un array e poi li assegni al controllo textbox che ti serve

dim arr_valore() as int

for i=0 to len(importo) - 1
	valore = mid(importo, i, 1)
	
	redim preserve arr_valore(i) as int	
	arr_valore = valore
next i

text1.text = arr_valore(0)
text2.text = arr_valore(1)
text3.text = arr_valore(2)

....

oppure con un array di controlli

for i=0 to len(importo) - 1
	valore = mid(importo, i, 1)
	
	text(i).text = valore 
next i

[alka]

Originariamente inviato da satriano
Salve.

Quale versione di VB??

[satriano]

Grazie Gudfella

Ad Alka:intendevo VB6.