Como leer caracter por caracter de una cadena string

Iniciado por ANTRAX, Julio 26, 2010, 11:42:21 AM

Tema anterior - Siguiente tema

0 Miembros y 1 Visitante están viendo este tema.

Julio 26, 2010, 11:42:21 AM Ultima modificación: Julio 08, 2011, 10:29:50 AM por ANTRAX
Código: vb
Private Sub Command1_Click()
Dim Contador As Integer
Texto = "Uno_a_UNo" ' cadena string
For Contador = 1 To Len(Texto)
MsgBox Mid(Texto, Contador, 1)
Next Contador
End Sub