Hex string to Int

[Armoured]

Hi,
In Java I can write:

String hex = "2A"  
int intValue = Integer.parseInt(hex, 16);

And in Basic4Android?

 

[Armoured]

Answer:

dim hex as String
dim intValue as Int
hex = "2A"  
intValue = Bit.ParseInt(hex, 16);

 

[Beja]

Thanks Armoured for the tip!
do you know b4a function for binary to hex?
I have the vb6: hexbyte = bin2hex("10110010")

 

[Stulish]

i have created a sub routine to convert binary to decimal:

Sub binTodec(binVal As String) As Int
Dim i As Int, v As Int, dec As Int 
i = binVal.Length
v = 1
For pos = i To 1 Step -1
    If binVal.SubString2(pos-1, pos) = "1" Then dec = dec + v
v = v * 2
Next 
Return dec
End Sub

then you can use:

Bit.ToHexString(binTodec("10110010"))

or similar

 

[Armoured]

Thanks Armoured for the tip!
do you know b4a function for binary to hex?
I have the vb6: hexbyte = bin2hex("10110010")

I think you want this:

Sub Bin2Hex(bnumber As String) As String
  Return Bit.ToHexString(Bit.ParseInt(bnumber,2))
End Sub

Then you can use:

Dim hexbyte as String
hexbyte = Bin2Hex("10110010")

 

[Stulish]

Nice

 

[Beja]

Armoured,
Did you test the above sub? in my machine it is saying nonconvertible type.
didn't touch your code, but tried to put the returned string in an edittext.
Thanks in advance for more light on this.

 

[Armoured]

Armoured,
Did you test the above sub? in my machine it is saying nonconvertible type.
didn't touch your code, but tried to put the returned string in an edittext.
Thanks in advance for more light on this.

Yes I have tested my code but you can control for yourself with this:

Msgbox("10110010 = " & Bin2Hex("10110010"),"Binary to Hex")

 

[Beja]

Yes Armoured, that was my mistake.

Thanks so much