Visual Basic 6 - problemi con l'Asc

Ciao a tutti,
Quando calcolo l'asc di un testo, mi calcola l'asc solo della prima lettera, come faccio a farglielo calcolare di tutta la parola?
ho provato con un ciclo for i=1 to Len(text1) ma non funziona. Questo è il codice.

Dim b, i
      For i=1 to Len(text1)
      b = Asc(text1)
      msgbox b
      Next i

Credo che dovresti fare Len(text1.text)....

Ho prvato ma nn funziona......

Ma tu poi fai sempre Asc(text1.text)...
Dovresti fare un altra text o listbox,meglio text in cui metterai tutta la parola...
Devi fare mettere una lettera alla volta nella lista...
E poi fai

For i = 1 to list1.listcount
list2.additem(list1.list(i))
next

Altrimenti se vuoi fare solo con la text dovresti fare Left(VALORE CHE OGni VOLTA AUMENTA) !!!
...