Dim chars() As Char
Dim bytes() As Byte = New Byte() {65, 83, 67, 73, 73, 32, 69, 110,
99, 111, 100, 105, 110, 103, 32, 69, 120, 97, 109, 112, 108, 101}
Dim ascii As System.Text.ASC IIEncoding = New
System.Text.ASC IIEncoding()
Dim charCount As Integer = ascii.GetCharCo unt(bytes, 6, 8)
chars = New Char(charCount) {}
Dim charsDecodedCou nt As Integer = ascii.GetChars( bytes, 6, 8,
chars, 0)
MsgBox("{0} characters used to decode bytes.", charsDecodedCou nt)
MsgBox("Decoded chars: ")
Dim c As Char
For Each c In chars
MsgBox("[{0}]" & vbTab & c)
Next
--
Get a powerful web, database, application, and email hosting with KJM
Solutions
http://www.kjmsolutions.com
"Joris De Groote" <jo************ @skynet.be> wrote in message
news:%2******** ********@TK2MSF TNGP04.phx.gbl. ..
Hi,
I have a 1 dimensional table byte with a number af characters in ASCII
code. How do I convert those ASCII codes to real letters?
Thanks