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
1 respuesta
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
