Leer string
Me gustaría saber como puedo leer carácter a carácter un string.
Es para decodificar info que esta codificada por tramos en el string
Gracias
Es para decodificar info que esta codificada por tramos en el string
Gracias
Respuesta de aja72
1
Puedes hacerlo con la instrucción Mid(variable, intentar, longitud). Sería algo así:
Dim Str As String
Dim c1 As String
Dim c2 As String
Dim c3 As String
Str = "ABC"
c1 = Mid(Str,1,1) 'c1="A"
c2 = Mid(Str,2,1) 'c2="B"
c3 = Mid(Str,2) 'c3="BC"
Para saver el valor ASCII de un caracter utiliza Asc(), por ejemplo Asc(c1)=Asc("A")=65
Dim Str As String
Dim c1 As String
Dim c2 As String
Dim c3 As String
Str = "ABC"
c1 = Mid(Str,1,1) 'c1="A"
c2 = Mid(Str,2,1) 'c2="B"
c3 = Mid(Str,2) 'c3="BC"
Para saver el valor ASCII de un caracter utiliza Asc(), por ejemplo Asc(c1)=Asc("A")=65
