How to change a String into a Byte to show a ASCII Character

[Tobi]

Hi,
i have a problem.
I want to get Ascii Caracters out of a 7 Bit long Byte, that should be
no problem with the getString Method, but i dont have a byte i have a
String which contains only an array of bits (i.e. 0010101).

Can anybody help me to change this string into a byte ?
Thank you,

Tobias

 

[Jeremy Kitchen]

Hi,
i have a problem.
I want to get Ascii Caracters out of a 7 Bit long Byte, that should be
no problem with the getString Method, but i dont have a byte i have a
String which contains only an array of bits (i.e. 0010101).

Can anybody help me to change this string into a byte ?
Thank you,

Tobias

Try
Convert.ToByte("0010101")

 

[Tobi]

Try
Convert.ToByte("0010101")

Its not working, i get an overflow (Make sure your not dividing
through zero...)
any other ideas ?

 

[Jeremy Kitchen]

Its not working, i get an overflow (Make sure your not dividing
through zero...)
any other ideas ?

Oops That creates trouble because it isn't treating it as a byte
array.

Try this function instead. You will want to add length checking etc.

Function GetChar(ByVal MybyteArray As String) As Char
Dim i As Integer = MybyteArray.Length - 1
Dim MyByte As Byte = 0
While i >= 0
If MybyteArray.Chars(i) = "1"c Then
MyByte = MyByte + 2 ^ i
End If
i -= 1
End While
Return Convert.ToChar(MyByte)
End Function

 

[Mudhead]

Convert.ToByte("0010101", 2)

Oops That creates trouble because it isn't treating it as a byte
array.

Try this function instead. You will want to add length checking etc.

Function GetChar(ByVal MybyteArray As String) As Char
Dim i As Integer = MybyteArray.Length - 1
Dim MyByte As Byte = 0
While i >= 0
If MybyteArray.Chars(i) = "1"c Then
MyByte = MyByte + 2 ^ i
End If
i -= 1
End While
Return Convert.ToChar(MyByte)
End Function

 

[Tobi]

Convert.ToByte("0010101", 2)

Sorry this link is not working