Imprimir Página - Como leer caracter por caracter de una cadena string

Título: Como leer caracter por caracter de una cadena string
Publicado por: ANTRAX en Julio 26, 2010, 11:42:21 AM

Código (vb) [Seleccionar]

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

Underc0de

Programación General => Visual Basic => Códigos Fuentes => Mensaje iniciado por: ANTRAX en Julio 26, 2010, 11:42:21 AM