Spanish convertir de hexadecimal a string

jluisruelas

Member
Licensed User
Longtime User
amigos, aqui de nuevo, tengo un problema y es que quiero poder convertir un numero hexadecimal que recibo por bluetooth en su equivalente en ascii o string ejemplo yo recibo por el bluetooth el 0x31 y quiero que me muestre el 1 que seria el equivalente, veo el ejemplo de byteconverter pero no entiendo nada jejej
saludos
 
Hola

Puedes emplear esto

Code:
Dim i As Int
i = Bit.ParseInt("31", 16)

Log("ASCII " &   chr(i) )

Saludos
 
Last edited:
Hola

Puedes emplear esto

Code:
Dim i As Int
i = Bit.ParseInt("31", 16)

Log("ASCII " &   chr(i) )
Saludos
intente lo que dices y este es el codigo
Code:
Sub AStreams_NewData (Buffer() As Byte)
Dim TXTO As String
    Dbls = Array As Double(1,234, 5.678)
    Ints = Array As Int(10, -2, 3, -4)
'TXTO = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
For i=0 To Buffer.Length-1
TXTO=Bit.ParseInt(Buffer(i),16)
txtLog.Text=TXTO & txtLog.Text
Next

End Sub
el problema es que me muestra solamente numeros
 
Hola

el problema es que me muestra solamente numeros

Si te fijas en el ejemplo mio en el LOG veras la solución, si lo que quieres es que te lo convierta a ASCII cambia tu linea por esta:

Code:
  txtLog.Text=chr(TXTO) & txtLog.Text


Saludos
 
Back
Top