[VB6] Generare le lettere dell'alfabeto

[x69asterix]

Buongiorno,
come posso generare tutte le lettere dell' alfabeto?.
In pratica all'apertura del form load, invece di:

With List1
.AddItem "A"
.AddItem "B"
.AddItem "C"
.AddItem "D"
......
.....

End With

è possibile aggiungerli in modo diverso anche con un ciclo:

For i = o To ??
.AddItem (??)
next
Ciao

[JCave]

Prova così:

Dim i
For i = 65 To 90
List1.AddItem Chr(i)
Next i

[x69asterix]

Originariamente inviato da JCave
Prova così:

Dim i
For i = 65 To 90
List1.AddItem Chr(i)
Next i

ottimo!!
funziona!
ciao