Underc0de - Hacking y seguridad informática

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

Título: Como leer caracter por caracter de una cadena string
Publicado por: ANTRAX en Julio 26, 2010, 11:42:21 am
Código: Visual Basic
  1. Private Sub Command1_Click()
  2. Dim Contador As Integer
  3. Texto = "Uno_a_UNo" ' cadena string
  4. For Contador = 1 To Len(Texto)
  5. MsgBox Mid(Texto, Contador, 1)
  6. Next Contador
  7. End Sub