| |||
Re: como puedo recorrer una cadena Hola Espero que el siguiente código sea lo que buscas. Suponiendo que escribes la cadena en el text1 y guardas los caracteres en un array llamado cad:
Código:
--Saludos-- Dim i As Integer Dim cad(30) As String For i = 1 To Len(Text1.Text) cad(i - 1) = Mid(Text1.Text, i, 1) Next i |