Access - Funcion para pasar de binario a char

 
Vista:

Funcion para pasar de binario a char

Publicado por Irene (30 intervenciones) el 04/12/2006 10:48:21
Por favor, ¿alguien sabe de alguna función para pasar un datos binario a carácter?
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Funcion para pasar de binario a char

Publicado por Salo (152 intervenciones) el 04/12/2006 19:35:59
Prueba con esta función

Public Function Conver()
Dim i As Integer, NCar As Integer, S As String, v As Integer, Bin As String

Bin = "11011010"
NCar = Len(Bin)
For i = 0 To NCar - 1
v = v + Mid$(Bin, NCar - i, 1) * (2 ^ i)
Next i

S = Chr$(v)
Debug.Print S; v
End Function

Espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Funcion para pasar de binario a char

Publicado por Irene (30 intervenciones) el 05/12/2006 08:10:37
Muchas gracias!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar